
Time bar (total: 1.2min)
| 1× | search |
| Probability | Valid | Unknown | Precondition | Infinite | Domain | Can't | Iter |
|---|---|---|---|---|---|---|---|
| 0% | 0% | 99.9% | 0.1% | 0% | 0% | 0% | 0 |
| 0% | 0% | 99.9% | 0.1% | 0% | 0% | 0% | 1 |
| 0% | 0% | 99.9% | 0.1% | 0% | 0% | 0% | 2 |
| 0% | 0% | 99.9% | 0.1% | 0% | 0% | 0% | 3 |
| 0% | 0% | 99.9% | 0.1% | 0% | 0% | 0% | 4 |
| 0% | 0% | 99.9% | 0.1% | 0% | 0% | 0% | 5 |
| 0% | 0% | 99.9% | 0.1% | 0% | 0% | 0% | 6 |
| 37.5% | 37.4% | 62.4% | 0.1% | 0% | 0% | 0% | 7 |
| 37.5% | 37.4% | 62.4% | 0.1% | 0% | 0% | 0% | 8 |
| 43.8% | 43.7% | 56.2% | 0.1% | 0% | 0% | 0% | 9 |
| 43.8% | 43.7% | 56.2% | 0.1% | 0% | 0% | 0% | 10 |
| 43.8% | 43.7% | 56.2% | 0.1% | 0% | 0% | 0% | 11 |
| 46.9% | 46.8% | 53% | 0.1% | 0% | 0% | 0% | 12 |
Compiled 32 to 20 computations (37.5% saved)
| 1.7s | 8 256× | 0 | valid |
ival-cos: 404.0ms (27.5% of total)ival-sin: 361.0ms (24.5% of total)ival-mult: 265.0ms (18% of total)ival-tan: 219.0ms (14.9% of total)ival-div: 57.0ms (3.9% of total)ival-fabs: 48.0ms (3.3% of total)ival-atan: 42.0ms (2.9% of total)ival-sub: 35.0ms (2.4% of total)ival-neg: 35.0ms (2.4% of total)adjust: 3.0ms (0.2% of total)ival-assert: 3.0ms (0.2% of total)| Ground Truth | Overpredictions | Example | Underpredictions | Example | Subexpression |
|---|---|---|---|---|---|
| 100 | 0 | - | 0 | - | (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))) |
| 9 | 0 | - | 2 | (1.4543022577490839e-61 -1.901168222006342e-275 -2.4039842456587706e-263) | (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew) |
| 0 | 0 | - | 0 | - | (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) |
| 0 | 0 | - | 0 | - | (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)) |
| 0 | 0 | - | 0 | - | t |
| 0 | 0 | - | 0 | - | (neg.f64 eh) |
| 0 | 0 | - | 0 | - | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| 0 | 0 | - | 0 | - | (*.f64 (neg.f64 eh) (tan.f64 t)) |
| 0 | 0 | - | 0 | - | (*.f64 ew (cos.f64 t)) |
| 0 | 0 | - | 0 | - | (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))) |
| 0 | 0 | - | 0 | - | (sin.f64 t) |
| 0 | 0 | - | 0 | - | (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) |
| 0 | 0 | - | 0 | - | (*.f64 eh (sin.f64 t)) |
| 0 | 0 | - | 0 | - | (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
| 0 | 0 | - | 0 | - | (cos.f64 t) |
| 0 | 0 | - | 0 | - | (tan.f64 t) |
| 0 | 0 | - | 0 | - | ew |
| 0 | 0 | - | 0 | - | eh |
| Operator | Subexpression | Explanation | Count | |
|---|---|---|---|---|
cos.f64 | (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))) | sensitivity | 100 | 0 |
| Predicted + | Predicted - | |
|---|---|---|
| + | 0 | 0 |
| - | 100 | 156 |
| Predicted + | Predicted Maybe | Predicted - | |
|---|---|---|---|
| + | 0 | 0 | 0 |
| - | 100 | 0 | 156 |
| number | freq |
|---|---|
| 0 | 156 |
| 1 | 100 |
| Predicted + | Predicted Maybe | Predicted - | |
|---|---|---|---|
| + | 0 | 0 | 0 |
| - | 1 | 0 | 0 |
| 281.0ms | 104× | 2 | valid |
| 89.0ms | 94× | 1 | valid |
| 81.0ms | 314× | 0 | valid |
Compiled 322 to 58 computations (82% saved)
ival-sin: 245.0ms (62.1% of total)ival-cos: 65.0ms (16.5% of total)ival-mult: 25.0ms (6.3% of total)adjust: 17.0ms (4.3% of total)ival-tan: 17.0ms (4.3% of total)ival-atan: 7.0ms (1.8% of total)ival-sub: 7.0ms (1.8% of total)ival-div: 5.0ms (1.3% of total)ival-fabs: 4.0ms (1% of total)ival-neg: 2.0ms (0.5% of total)ival-true: 1.0ms (0.3% of total)ival-assert: 0.0ms (0% of total)Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 96 | 297 |
| 1 | 289 | 291 |
| 2 | 819 | 291 |
| 3 | 2171 | 291 |
| 4 | 5606 | 291 |
| 0 | 18 | 30 |
| 0 | 33 | 30 |
| 1 | 66 | 30 |
| 2 | 142 | 30 |
| 3 | 380 | 30 |
| 4 | 1242 | 30 |
| 5 | 4611 | 30 |
| 0 | 8157 | 30 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| Outputs |
|---|
(fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
(fabs.f64 (fma.f64 (*.f64 (neg.f64 ew) (cos.f64 t)) (cos.f64 (atan.f64 (*.f64 (/.f64 (neg.f64 eh) ew) (tan.f64 t)))) (*.f64 (sin.f64 (atan.f64 (*.f64 (/.f64 (neg.f64 eh) ew) (tan.f64 t)))) (*.f64 (sin.f64 t) eh)))) |
Compiled 30 to 18 computations (40% saved)
Compiled 0 to 3 computations (-∞% saved)
| Status | Accuracy | Program |
|---|---|---|
| ▶ | 99.8% | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
Compiled 30 to 18 computations (40% saved)
| Inputs |
|---|
(fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
(-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
(*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) |
(*.f64 ew (cos.f64 t)) |
ew |
(cos.f64 t) |
t |
(cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))) |
(atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)) |
(/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew) |
(*.f64 (neg.f64 eh) (tan.f64 t)) |
(neg.f64 eh) |
eh |
(tan.f64 t) |
(*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) |
(*.f64 eh (sin.f64 t)) |
(sin.f64 t) |
(sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))) |
| Outputs |
|---|
#s(approx (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) #s(hole binary64 (fabs (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (cos (atan (/ (* (neg eh) (tan t)) ew))) #s(hole binary64 (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (atan (/ (* (neg eh) (tan t)) ew)) #s(hole binary64 (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* -1 (/ (* eh (sin t)) (cos t))))) |
#s(approx (neg eh) #s(hole binary64 (* -1 eh))) |
#s(approx eh #s(hole binary64 eh)) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* eh (sin t)))) |
#s(approx (sin (atan (/ (* (neg eh) (tan t)) ew))) #s(hole binary64 (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* ew (cos t)) #s(hole binary64 (* ew (cos t)))) |
#s(approx ew #s(hole binary64 ew)) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* -1/2 (* ew (* t (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* t (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/6 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (+ (* -1/2 (* ew (* (pow t 2) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (* ew (* (pow t 2) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* -1/720 (* ew (* (pow t 2) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/24 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))))) |
#s(approx (* ew (cos t)) #s(hole binary64 ew)) |
#s(approx (* ew (cos t)) #s(hole binary64 (+ ew (* -1/2 (* ew (pow t 2)))))) |
#s(approx (* ew (cos t)) #s(hole binary64 (+ ew (* (pow t 2) (+ (* -1/2 ew) (* 1/24 (* ew (pow t 2)))))))) |
#s(approx (* ew (cos t)) #s(hole binary64 (+ ew (* (pow t 2) (+ (* -1/2 ew) (* (pow t 2) (+ (* -1/720 (* ew (pow t 2))) (* 1/24 ew)))))))) |
#s(approx (cos t) #s(hole binary64 1)) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* -1/2 (pow t 2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* 1/24 (pow t 2)) 1/2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/24 (* -1/720 (pow t 2)))) 1/2))))) |
#s(approx t #s(hole binary64 t)) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* -1/3 (/ (* eh (pow t 2)) ew)))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* (pow t 2) (+ (* -1/3 (/ eh ew)) (* -2/15 (/ (* eh (pow t 2)) ew)))))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* (pow t 2) (+ (* -1/3 (/ eh ew)) (* (pow t 2) (+ (* -2/15 (/ eh ew)) (* -17/315 (/ (* eh (pow t 2)) ew)))))))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* -1 (* eh t)))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* t (+ (* -1 eh) (* -1/3 (* eh (pow t 2))))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* t (+ (* -1 eh) (* (pow t 2) (+ (* -1/3 eh) (* -2/15 (* eh (pow t 2))))))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* t (+ (* -1 eh) (* (pow t 2) (+ (* -1/3 eh) (* (pow t 2) (+ (* -2/15 eh) (* -17/315 (* eh (pow t 2))))))))))) |
#s(approx (tan t) #s(hole binary64 t)) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* 1/3 (pow t 2)))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* 2/15 (pow t 2)))))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* (pow t 2) (+ 2/15 (* 17/315 (pow t 2)))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* t (+ (* -1/6 (* eh (* (pow t 2) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* t (+ (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/6 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/120 (* eh (* (pow t 2) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* t (+ (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/6 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* -1/5040 (* eh (* (pow t 2) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/120 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* eh t))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* -1/6 (* eh (pow t 2))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* 1/120 (* eh (pow t 2))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* (pow t 2) (+ (* -1/5040 (* eh (pow t 2))) (* 1/120 eh))))))))) |
#s(approx (sin t) #s(hole binary64 t)) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* -1/6 (pow t 2)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* 1/120 (pow t 2)) 1/6)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/120 (* -1/5040 (pow t 2)))) 1/6)))))) |
#s(approx (cos t) #s(hole binary64 (cos t))) |
#s(approx (tan t) #s(hole binary64 (/ (sin t) (cos t)))) |
#s(approx (sin t) #s(hole binary64 (sin t))) |
9 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 8.0ms | ew | @ | inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (cos t)) ew (cos t) t (cos (atan (/ (* (neg eh) (tan t)) ew))) (atan (/ (* (neg eh) (tan t)) ew)) (/ (* (neg eh) (tan t)) ew) (* (neg eh) (tan t)) (neg eh) eh (tan t) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (* eh (sin t)) (sin t) (sin (atan (/ (* (neg eh) (tan t)) ew)))) |
| 7.0ms | eh | @ | 0 | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (cos t)) ew (cos t) t (cos (atan (/ (* (neg eh) (tan t)) ew))) (atan (/ (* (neg eh) (tan t)) ew)) (/ (* (neg eh) (tan t)) ew) (* (neg eh) (tan t)) (neg eh) eh (tan t) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (* eh (sin t)) (sin t) (sin (atan (/ (* (neg eh) (tan t)) ew)))) |
| 7.0ms | eh | @ | inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (cos t)) ew (cos t) t (cos (atan (/ (* (neg eh) (tan t)) ew))) (atan (/ (* (neg eh) (tan t)) ew)) (/ (* (neg eh) (tan t)) ew) (* (neg eh) (tan t)) (neg eh) eh (tan t) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (* eh (sin t)) (sin t) (sin (atan (/ (* (neg eh) (tan t)) ew)))) |
| 5.0ms | eh | @ | -inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (cos t)) ew (cos t) t (cos (atan (/ (* (neg eh) (tan t)) ew))) (atan (/ (* (neg eh) (tan t)) ew)) (/ (* (neg eh) (tan t)) ew) (* (neg eh) (tan t)) (neg eh) eh (tan t) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (* eh (sin t)) (sin t) (sin (atan (/ (* (neg eh) (tan t)) ew)))) |
| 5.0ms | t | @ | inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (cos t)) ew (cos t) t (cos (atan (/ (* (neg eh) (tan t)) ew))) (atan (/ (* (neg eh) (tan t)) ew)) (/ (* (neg eh) (tan t)) ew) (* (neg eh) (tan t)) (neg eh) eh (tan t) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (* eh (sin t)) (sin t) (sin (atan (/ (* (neg eh) (tan t)) ew)))) |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 318 | 2293 |
| 0 | 346 | 2059 |
| 1 | 1816 | 2053 |
| 0 | 8296 | 1997 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
(fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
(-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
(*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) |
(*.f64 ew (cos.f64 t)) |
ew |
(cos.f64 t) |
t |
(cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))) |
(atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)) |
(/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew) |
(*.f64 (neg.f64 eh) (tan.f64 t)) |
(neg.f64 eh) |
eh |
(tan.f64 t) |
(*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) |
(*.f64 eh (sin.f64 t)) |
(sin.f64 t) |
(sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))) |
#s(approx (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) #s(hole binary64 (fabs (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (cos (atan (/ (* (neg eh) (tan t)) ew))) #s(hole binary64 (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (atan (/ (* (neg eh) (tan t)) ew)) #s(hole binary64 (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* -1 (/ (* eh (sin t)) (cos t))))) |
#s(approx (neg eh) #s(hole binary64 (* -1 eh))) |
#s(approx eh #s(hole binary64 eh)) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* eh (sin t)))) |
#s(approx (sin (atan (/ (* (neg eh) (tan t)) ew))) #s(hole binary64 (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* ew (cos t)) #s(hole binary64 (* ew (cos t)))) |
#s(approx ew #s(hole binary64 ew)) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* -1/2 (* ew (* t (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* t (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/6 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (+ (* -1/2 (* ew (* (pow t 2) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (* ew (* (pow t 2) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* -1/720 (* ew (* (pow t 2) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/24 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))))) |
#s(approx (* ew (cos t)) #s(hole binary64 ew)) |
#s(approx (* ew (cos t)) #s(hole binary64 (+ ew (* -1/2 (* ew (pow t 2)))))) |
#s(approx (* ew (cos t)) #s(hole binary64 (+ ew (* (pow t 2) (+ (* -1/2 ew) (* 1/24 (* ew (pow t 2)))))))) |
#s(approx (* ew (cos t)) #s(hole binary64 (+ ew (* (pow t 2) (+ (* -1/2 ew) (* (pow t 2) (+ (* -1/720 (* ew (pow t 2))) (* 1/24 ew)))))))) |
#s(approx (cos t) #s(hole binary64 1)) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* -1/2 (pow t 2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* 1/24 (pow t 2)) 1/2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/24 (* -1/720 (pow t 2)))) 1/2))))) |
#s(approx t #s(hole binary64 t)) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* -1/3 (/ (* eh (pow t 2)) ew)))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* (pow t 2) (+ (* -1/3 (/ eh ew)) (* -2/15 (/ (* eh (pow t 2)) ew)))))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* (pow t 2) (+ (* -1/3 (/ eh ew)) (* (pow t 2) (+ (* -2/15 (/ eh ew)) (* -17/315 (/ (* eh (pow t 2)) ew)))))))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* -1 (* eh t)))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* t (+ (* -1 eh) (* -1/3 (* eh (pow t 2))))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* t (+ (* -1 eh) (* (pow t 2) (+ (* -1/3 eh) (* -2/15 (* eh (pow t 2))))))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* t (+ (* -1 eh) (* (pow t 2) (+ (* -1/3 eh) (* (pow t 2) (+ (* -2/15 eh) (* -17/315 (* eh (pow t 2))))))))))) |
#s(approx (tan t) #s(hole binary64 t)) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* 1/3 (pow t 2)))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* 2/15 (pow t 2)))))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* (pow t 2) (+ 2/15 (* 17/315 (pow t 2)))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* t (+ (* -1/6 (* eh (* (pow t 2) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* t (+ (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/6 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/120 (* eh (* (pow t 2) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* t (+ (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/6 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* -1/5040 (* eh (* (pow t 2) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/120 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* eh t))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* -1/6 (* eh (pow t 2))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* 1/120 (* eh (pow t 2))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* (pow t 2) (+ (* -1/5040 (* eh (pow t 2))) (* 1/120 eh))))))))) |
#s(approx (sin t) #s(hole binary64 t)) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* -1/6 (pow t 2)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* 1/120 (pow t 2)) 1/6)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/120 (* -1/5040 (pow t 2)))) 1/6)))))) |
#s(approx (cos t) #s(hole binary64 (cos t))) |
#s(approx (tan t) #s(hole binary64 (/ (sin t) (cos t)))) |
#s(approx (sin t) #s(hole binary64 (sin t))) |
| Outputs |
|---|
(*.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
(pow.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) |
(/.f64 (fabs.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)))) (fabs.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
(/.f64 (fabs.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64)))) (fabs.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))))) |
(sqrt.f64 (*.f64 (-.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) (-.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
(sqrt.f64 (pow.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) #s(literal 2 binary64))) |
(fabs.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
(fabs.f64 (neg.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))))) |
(fabs.f64 (-.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) |
(fabs.f64 (neg.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
(fabs.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) (*.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))))) |
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64))) (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) |
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))))) |
(fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(fma.f64 (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (cos.f64 t) ew) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) (/.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))))) (/.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))))) |
(-.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(+.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) |
(*.f64 (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (cos.f64 t) ew)) |
(*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(*.f64 (cos.f64 t) ew) |
(*.f64 ew (cos.f64 t)) |
ew |
(fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(sin.f64 (+.f64 (neg.f64 t) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (+.f64 t (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 (neg.f64 t))) |
(cos.f64 (neg.f64 t)) |
(cos.f64 t) |
(+.f64 (*.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
t |
(pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) #s(literal 2 binary64)))) #s(literal -1 binary64)) |
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) #s(literal 2 binary64))))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) #s(literal 2 binary64)))))) |
(fma.f64 (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(sin.f64 (+.f64 (neg.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (+.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 (neg.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(cos.f64 (neg.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) |
(cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) |
(+.f64 (*.f64 (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))) |
(*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) |
(/.f64 (neg.f64 (neg.f64 (*.f64 (neg.f64 eh) (tan.f64 t)))) (neg.f64 (neg.f64 ew))) |
(/.f64 (neg.f64 (*.f64 (neg.f64 eh) (tan.f64 t))) (neg.f64 ew)) |
(/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew) |
(*.f64 (neg.f64 eh) (tan.f64 t)) |
(*.f64 (*.f64 eh (tan.f64 t)) #s(literal -1 binary64)) |
(*.f64 #s(literal -1 binary64) (*.f64 eh (tan.f64 t))) |
(*.f64 (tan.f64 t) (neg.f64 eh)) |
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) eh))) (neg.f64 (cos.f64 t))) |
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) eh)) (cos.f64 t)) |
(neg.f64 (*.f64 eh (tan.f64 t))) |
(*.f64 #s(literal -1 binary64) eh) |
(*.f64 eh #s(literal -1 binary64)) |
(neg.f64 eh) |
eh |
(/.f64 (neg.f64 (neg.f64 (sin.f64 t))) (neg.f64 (neg.f64 (cos.f64 t)))) |
(/.f64 (+.f64 (tan.f64 t) (tan.f64 (PI.f64))) (-.f64 #s(literal 1 binary64) (*.f64 (tan.f64 t) (tan.f64 (PI.f64))))) |
(/.f64 (neg.f64 (sin.f64 t)) (neg.f64 (cos.f64 t))) |
(/.f64 (sin.f64 t) (cos.f64 t)) |
(tan.f64 (+.f64 (+.f64 t (PI.f64)) (PI.f64))) |
(tan.f64 (+.f64 t (PI.f64))) |
(tan.f64 t) |
(*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) |
(*.f64 (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (sin.f64 t) eh)) |
(*.f64 eh (*.f64 (sin.f64 t) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(*.f64 (sin.f64 t) eh) |
(*.f64 eh (sin.f64 t)) |
(sin.f64 t) |
(tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) |
(/.f64 (neg.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))) (neg.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) #s(literal 2 binary64)))))) |
(/.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) #s(literal 2 binary64))))) |
(sin.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) |
#s(approx (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (fabs.f64 (-.f64 (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 (neg.f64 eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (cos (atan (/ (* (neg eh) (tan t)) ew))) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (atan (/ (* (neg eh) (tan t)) ew)) (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (* (neg eh) (tan t)) (*.f64 (neg.f64 eh) (tan.f64 t))) |
#s(approx (neg eh) (neg.f64 eh)) |
#s(approx eh eh) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 (*.f64 (sin.f64 t) eh) (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* eh (sin t)) (*.f64 (sin.f64 t) eh)) |
#s(approx (sin (atan (/ (* (neg eh) (tan t)) ew))) (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (neg.f64 eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh)) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (neg.f64 eh) (*.f64 #s(literal -1 binary64) (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 (neg.f64 eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* ew (cos t)) (*.f64 (cos.f64 t) ew)) |
#s(approx ew ew) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (fma.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t) (/.f64 (*.f64 (neg.f64 eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) ew)) ew)) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) ew)) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 (neg.f64 eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) t) (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) ew))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 (fma.f64 (*.f64 #s(literal -1/2 binary64) ew) (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) t) (*.f64 (neg.f64 eh) (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) t (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) ew))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/6 binary64) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) t) (*.f64 (*.f64 #s(literal -1/2 binary64) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) t (*.f64 (neg.f64 eh) (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) t (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) ew))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) ew)) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (fma.f64 (*.f64 #s(literal -1/2 binary64) ew) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) ew))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (fma.f64 (fma.f64 (*.f64 #s(literal 1/24 binary64) ew) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 t t) (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) ew))) |
#s(approx (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/720 binary64) ew) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 #s(literal 1/24 binary64) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 t t) (*.f64 (*.f64 #s(literal -1/2 binary64) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 t t) (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) ew))) |
#s(approx (* ew (cos t)) ew) |
#s(approx (* ew (cos t)) (fma.f64 (*.f64 (*.f64 t t) ew) #s(literal -1/2 binary64) ew)) |
#s(approx (* ew (cos t)) (fma.f64 (fma.f64 (*.f64 (*.f64 t t) ew) #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) ew)) (*.f64 t t) ew)) |
#s(approx (* ew (cos t)) (fma.f64 (fma.f64 (fma.f64 (*.f64 (*.f64 t t) ew) #s(literal -1/720 binary64) (*.f64 #s(literal 1/24 binary64) ew)) (*.f64 t t) (*.f64 #s(literal -1/2 binary64) ew)) (*.f64 t t) ew)) |
#s(approx (cos t) #s(literal 1 binary64)) |
#s(approx (cos t) (fma.f64 (*.f64 t t) #s(literal -1/2 binary64) #s(literal 1 binary64))) |
#s(approx (cos t) (fma.f64 (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 t t)) #s(literal 1/2 binary64)) (*.f64 t t) #s(literal 1 binary64))) |
#s(approx (cos t) (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/720 binary64) (*.f64 t t) #s(literal 1/24 binary64)) (*.f64 t t)) #s(literal 1/2 binary64)) (*.f64 t t) #s(literal 1 binary64))) |
#s(approx t t) |
#s(approx (/ (* (neg eh) (tan t)) ew) (/.f64 (*.f64 (neg.f64 eh) t) ew)) |
#s(approx (/ (* (neg eh) (tan t)) ew) (*.f64 (/.f64 (fma.f64 (*.f64 (*.f64 t t) eh) #s(literal -1/3 binary64) (neg.f64 eh)) ew) t)) |
#s(approx (/ (* (neg eh) (tan t)) ew) (*.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -2/15 binary64) (*.f64 (*.f64 t t) eh) (*.f64 #s(literal -1/3 binary64) eh)) ew) (*.f64 t t) (/.f64 (neg.f64 eh) ew)) t)) |
#s(approx (/ (* (neg eh) (tan t)) ew) (*.f64 (fma.f64 (fma.f64 (/.f64 (fma.f64 #s(literal -17/315 binary64) (*.f64 (*.f64 t t) eh) (*.f64 #s(literal -2/15 binary64) eh)) ew) (*.f64 t t) (*.f64 #s(literal -1/3 binary64) (/.f64 eh ew))) (*.f64 t t) (/.f64 (neg.f64 eh) ew)) t)) |
#s(approx (* (neg eh) (tan t)) (*.f64 (neg.f64 eh) t)) |
#s(approx (* (neg eh) (tan t)) (*.f64 (fma.f64 (*.f64 (*.f64 t t) eh) #s(literal -1/3 binary64) (neg.f64 eh)) t)) |
#s(approx (* (neg eh) (tan t)) (*.f64 (fma.f64 (fma.f64 #s(literal -2/15 binary64) (*.f64 (*.f64 t t) eh) (*.f64 #s(literal -1/3 binary64) eh)) (*.f64 t t) (neg.f64 eh)) t)) |
#s(approx (* (neg eh) (tan t)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -17/315 binary64) (*.f64 (*.f64 t t) eh) (*.f64 #s(literal -2/15 binary64) eh)) (*.f64 t t) (*.f64 #s(literal -1/3 binary64) eh)) (*.f64 t t) (neg.f64 eh)) t)) |
#s(approx (tan t) t) |
#s(approx (tan t) (*.f64 (fma.f64 #s(literal 1/3 binary64) (*.f64 t t) #s(literal 1 binary64)) t)) |
#s(approx (tan t) (*.f64 (fma.f64 (fma.f64 #s(literal 2/15 binary64) (*.f64 t t) #s(literal 1/3 binary64)) (*.f64 t t) #s(literal 1 binary64)) t)) |
#s(approx (tan t) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal 17/315 binary64) (*.f64 t t) #s(literal 2/15 binary64)) (*.f64 t t) #s(literal 1/3 binary64)) (*.f64 t t) #s(literal 1 binary64)) t)) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 (*.f64 eh t) (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 (fma.f64 (*.f64 #s(literal -1/6 binary64) eh) (*.f64 (*.f64 t t) (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) t)) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 (fma.f64 (fma.f64 (*.f64 #s(literal 1/120 binary64) eh) (*.f64 (*.f64 t t) (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 #s(literal -1/6 binary64) eh) (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 t t) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) t)) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 (fma.f64 (fma.f64 (fma.f64 (*.f64 #s(literal -1/5040 binary64) eh) (*.f64 (*.f64 t t) (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 #s(literal 1/120 binary64) eh) (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 t t) (*.f64 (*.f64 #s(literal -1/6 binary64) eh) (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 t t) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) t)) |
#s(approx (* eh (sin t)) (*.f64 eh t)) |
#s(approx (* eh (sin t)) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 t t) eh) eh) t)) |
#s(approx (* eh (sin t)) (*.f64 (fma.f64 (fma.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 t t) eh) (*.f64 #s(literal -1/6 binary64) eh)) (*.f64 t t) eh) t)) |
#s(approx (* eh (sin t)) (*.f64 (fma.f64 (fma.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 (*.f64 t t) eh) (*.f64 #s(literal 1/120 binary64) eh)) (*.f64 t t) (*.f64 #s(literal -1/6 binary64) eh)) (*.f64 t t) eh) t)) |
#s(approx (sin t) t) |
#s(approx (sin t) (*.f64 (fma.f64 #s(literal -1/6 binary64) (*.f64 t t) #s(literal 1 binary64)) t)) |
#s(approx (sin t) (*.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 t t)) #s(literal 1/6 binary64)) (*.f64 t t) #s(literal 1 binary64)) t)) |
#s(approx (sin t) (*.f64 (fma.f64 (-.f64 (*.f64 (fma.f64 #s(literal -1/5040 binary64) (*.f64 t t) #s(literal 1/120 binary64)) (*.f64 t t)) #s(literal 1/6 binary64)) (*.f64 t t) #s(literal 1 binary64)) t)) |
#s(approx (cos t) (cos.f64 t)) |
#s(approx (tan t) (tan.f64 t)) |
#s(approx (sin t) (sin.f64 t)) |
Compiled 8 170 to 991 computations (87.9% saved)
4 alts after pruning (4 fresh and 0 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 193 | 4 | 197 |
| Fresh | 0 | 0 | 0 |
| Picked | 1 | 0 | 1 |
| Done | 0 | 0 | 0 |
| Total | 194 | 4 | 198 |
| Status | Accuracy | Program |
|---|---|---|
| ▶ | 49.2% | (*.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
| ▶ | 99.7% | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| ▶ | 88.0% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh))) |
| ▶ | 90.3% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
Compiled 228 to 116 computations (49.1% saved)
| Inputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew))) |
(neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)) |
(*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew) |
(fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) |
eh |
(/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) |
(*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) |
(tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(*.f64 (/.f64 eh ew) (tan.f64 t)) |
(/.f64 eh ew) |
ew |
(tan.f64 t) |
t |
(sin.f64 t) |
(neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t))) |
(*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)) |
(cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(cos.f64 t) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh)) |
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh) |
(-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) |
(/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) |
(*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(*.f64 (cos.f64 t) ew) |
(fabs.f64 (-.f64 (*.f64 (*.f64 ew (fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
(-.f64 (*.f64 (*.f64 ew (fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
(*.f64 (*.f64 ew (fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) |
(*.f64 ew (fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) |
(fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(PI.f64) |
#s(literal 2 binary64) |
(*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) |
(cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))) |
(atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)) |
(/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew) |
(*.f64 (neg.f64 eh) (tan.f64 t)) |
(neg.f64 eh) |
(*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) |
(*.f64 eh (sin.f64 t)) |
(sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))) |
(*.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) |
(fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) |
(atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))) |
(*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) |
(/.f64 (tan.f64 t) ew) |
(*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) |
(neg.f64 (*.f64 (sin.f64 t) eh)) |
(*.f64 (sin.f64 t) eh) |
(tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) |
(asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))) |
| Outputs |
|---|
#s(approx (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) #s(hole binary64 (fabs (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow eh 2) (- (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t)))))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow eh 2) (- (* eh (- (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t)))))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* eh (+ (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) ew)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* eh (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) ew)) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) ew))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx eh #s(hole binary64 eh)) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) ew)))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* eh (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) ew)) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) ew))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* eh (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) ew)) (* eh (+ (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (+ (* -1/3 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (* ew (cos t)))) (+ (* 1/12 (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))))) (+ (* 1/12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (+ (* 1/4 (pow (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) 2)) (+ (* 1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))) (* ew (cos t))) (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* ew (cos t))))))))))) (+ (* 1/4 (/ (* (pow (sin t) 2) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (sin t) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))))) ew) (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) ew))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* -1 (/ (* eh (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* eh (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* eh (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* eh (+ (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* eh (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* eh (+ (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* eh (+ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (+ (* -1/3 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (* ew (cos t)))) (+ (* 1/12 (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))))) (+ (* 1/12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (+ (* 1/4 (pow (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) 2)) (+ (* 1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))) (* ew (cos t))) (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* ew (cos t))))))))))) (+ (* 1/4 (/ (* (pow (sin t) 2) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (sin t) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))))) (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* 1/2 (* eh (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/2 (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/2 (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (+ (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* eh (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (+ (* -1/3 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (* ew (cos t)))) (+ (* 1/12 (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))))) (+ (* 1/12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (+ (* 1/4 (pow (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) 2)) (+ (* 1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))) (* ew (cos t))) (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* ew (cos t))))))))))) (+ (* 1/4 (/ (* (pow (sin t) 2) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (sin t) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* 1/2 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/6 (* eh (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* eh (+ (* 1/24 (* eh (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4))))))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))))) |
#s(approx (neg (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (/ (* eh (sin t)) (* ew (cos t))))) |
#s(approx (/ eh ew) #s(hole binary64 (/ eh ew))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) #s(hole binary64 (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) #s(hole binary64 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (cos (atan (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (atan (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (- (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (- (* eh (- (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))) eh))) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (fabs (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) #s(hole binary64 (fabs (- (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t)))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))))) |
#s(approx (cos (atan (/ (* (neg eh) (tan t)) ew))) #s(hole binary64 (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (atan (/ (* (neg eh) (tan t)) ew)) #s(hole binary64 (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* -1 (/ (* eh (sin t)) (cos t))))) |
#s(approx (neg eh) #s(hole binary64 (* -1 eh))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* eh (sin t)))) |
#s(approx (sin (atan (/ (* (neg eh) (tan t)) ew))) #s(hole binary64 (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (sqrt (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (sqrt (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ 1 (* (pow ew 3) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (sqrt (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1/4 (* (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (sqrt (/ 1 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* 1/2 (* (sqrt (/ 1 (* (pow ew 3) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) (pow (sin t) 2)))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (sqrt (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* 1/2 (* (sqrt (/ 1 (* (pow ew 3) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) (pow (sin t) 2))) (* eh (+ (* -1/4 (* (sqrt (/ 1 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* 1/2 (* (* eh (- (* -1 (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) (* 1/4 (/ (pow (sin t) 4) (* (pow ew 3) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (sqrt (/ 1 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (cos (atan (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (atan (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (* (neg eh) (/ (tan t) ew)) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* (pow eh 2) (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (/ (pow (sin t) 2) (* ew (cos t))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* (pow eh 2) (+ (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (/ (pow (sin t) 2) (* ew (cos t))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* (pow eh 2) (+ (* eh (+ (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (+ (* -1/3 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (* ew (cos t)))) (+ (* 1/12 (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))))) (+ (* 1/12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (+ (* 1/4 (pow (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) 2)) (+ (* 1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))) (* ew (cos t))) (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* ew (cos t))))))))))) (+ (* 1/4 (/ (* (pow (sin t) 2) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (sin t) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t))))))))) (* -1 (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))))) (/ (pow (sin t) 2) (* ew (cos t))))))) |
#s(approx (neg (* (sin t) eh)) #s(hole binary64 (* -1 (* eh (sin t))))) |
#s(approx (* (sin t) eh) #s(hole binary64 (* eh (sin t)))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* 1/2 (* eh (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/2 (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/2 (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (+ (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* eh (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (+ (* -1/3 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (* ew (cos t)))) (+ (* 1/12 (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))))) (+ (* 1/12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (+ (* 1/4 (pow (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) 2)) (+ (* 1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))) (* ew (cos t))) (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* ew (cos t))))))))))) (+ (* 1/4 (/ (* (pow (sin t) 2) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (sin t) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* 1/2 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/6 (* eh (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* eh (+ (* 1/24 (* eh (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4))))))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (- (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (- (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) ew)))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) ew)))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew)) (+ (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) ew)) (/ (* (sin t) (- (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 6) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))))))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 6)))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (+ (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (* (pow eh 6) ew))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4)))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)) (+ (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4)) (/ (* (sin t) (- (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 6) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))))))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 6)))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (+ (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (pow eh 6))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (+ (/ 1 (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (* (pow eh 2) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (pow eh 4) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (* (pow eh 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))))) (+ (/ 1 (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (* (pow eh 2) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2))) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (pow eh 6) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (pow eh 6) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 6) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* (pow eh 6) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (pow eh 4) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 6) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (pow eh 6) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (/ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))))))) (* (pow eh 6) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (* (pow eh 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))))))))))) (+ (/ 1 (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (* (pow eh 2) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))))))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 6)))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))))))) (* (pow eh 6) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2))) (+ (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 6) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 6) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (+ (log (/ 1 eh)) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2)))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (+ (log (/ 1 eh)) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (pow eh 4)))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (+ (log (/ 1 eh)) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2)))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (pow eh 6))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (pow eh 4))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (+ (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* eh (- (/ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))) eh) (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (pow eh 4))) (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* (sqrt (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (sqrt -1)))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* eh (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (pow eh 3) (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (sqrt -1)))) (* (sqrt (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (* eh (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (sqrt -1)))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* eh (+ (* -1/2 (* (sqrt (/ (* (sin t) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (* (pow eh 5) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (/ (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (sqrt -1)))) (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (pow eh 3) (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (sqrt -1)))) (* (sqrt (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (* eh (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (sqrt -1))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* eh (+ (* -1/2 (* (sqrt (/ (* (sin t) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (* (pow eh 5) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (/ (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (sqrt -1)))) (+ (* -1/8 (* (sqrt (/ (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 3) (* (pow eh 5) (* (pow (sin t) 3) (pow (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 3))))) (/ (* (pow ew 2) (* (pow (cos t) 2) (pow (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) 2))) (pow (sqrt -1) 3)))) (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (pow eh 3) (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (sqrt -1)))) (* (sqrt (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (* eh (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (sqrt -1)))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (pow eh 4))) (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (pow eh 4))) (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2)))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (+ (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 3) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (/ (* (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))))) (pow eh 6))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (pow eh 4))) (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (pow eh 2) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (/ 1 (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (pow eh 2) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (pow eh 4) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (pow eh 2) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (+ (/ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (* (pow eh 4) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))))))) (+ (/ 1 (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (pow eh 2) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (* (pow eh 6) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (* (pow eh 6) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* (pow eh 6) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (pow eh 6) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 6) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 3) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (pow eh 4) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (pow eh 2) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (+ (/ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))) (* (pow eh 6) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (* (pow eh 4) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))))))))))))) (+ (/ 1 (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (pow eh 2) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))))))) (* (pow eh 6) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (* (pow eh 6) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (/ (* (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (* (pow eh 6) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (+ (* -1 (log (/ 1 eh))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (+ (* -1 (log (/ 1 eh))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (pow eh 4))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (+ (* -1 (log (/ 1 eh))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (pow eh 6))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (pow eh 4))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (- (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (- (* -1 (/ (- (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2)) (* -1 (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))))) eh)) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) eh))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (+ (* -1 (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))) (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2)))) eh))) eh))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (* -1 (/ (- (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* eh ew)) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (* -1 (/ (- (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 2) ew))) (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) ew))) eh)) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 2) ew))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 4) ew)) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 2) ew)))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (sin t) (- (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 3) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (/ (* (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))) (* (pow eh 6) ew)) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 4) ew)) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 2) ew))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (pow eh 2))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 4)) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (pow eh 2)))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 3) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (/ (* (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))) (pow eh 6)) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 4)) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (pow eh 2))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 2) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (/ 1 (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (pow eh 2) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (pow eh 4) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 2) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (/ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))))) (+ (/ 1 (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (pow eh 2) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (pow eh 6) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (pow eh 6) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* (pow eh 6) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (pow eh 6) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 6) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 3) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (pow eh 4) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 2) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (/ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (* (pow eh 6) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))))))))))) (+ (/ 1 (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (pow eh 2) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))))))) (* (pow eh 6) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 6) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 6) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (* -1 (log (/ -1 eh))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (* -1 (log (/ -1 eh))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (pow eh 4))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (* -1 (log (/ -1 eh))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (pow eh 6))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (pow eh 4))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (+ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) eh)) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (- (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))) eh))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))) eh)) (* -1 (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (+ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) eh)) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* (sqrt (/ (* eh (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (sqrt -1))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* eh (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 3) (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* ew (* (cos t) (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sqrt -1)))))) (* (sqrt (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (* eh (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (sqrt -1))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* eh (+ (* -1/2 (* (sqrt (/ (* (sin t) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (* (pow eh 5) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* (sqrt -1) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))))) (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 3) (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* ew (* (cos t) (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sqrt -1)))))) (* (sqrt (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (* eh (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (sqrt -1)))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* 1/8 (* (sqrt (/ (* eh (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 3)) (* (pow (sin t) 3) (pow (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 3)))) (* (pow ew 2) (* (pow (cos t) 2) (* (pow (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) 2) (sqrt -1)))))) (* 1/2 (* (sqrt (/ (* eh (* (sin t) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (* (sqrt -1) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))))))) (pow eh 3))) (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 3) (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* ew (* (cos t) (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sqrt -1)))))) (* (sqrt (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (* eh (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (sqrt -1)))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (+ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) eh)) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (* eh (+ (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (/ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (pow eh 2))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (* eh (+ (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 4)) (/ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (pow eh 2)))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (* eh (+ (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/720 (/ (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 6) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6)))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2)))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6)))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (sin t) 2))) (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))) (+ (* 1/720 (/ (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 6)))) (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (+ (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (/ (* (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (pow eh 6)) (+ (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 4)) (/ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (pow eh 2))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (+ (/ 1 (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (* (pow eh 2) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (pow eh 4) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (/ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (* (pow eh 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))))) (+ (/ 1 (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (* (pow eh 2) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 6) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (pow eh 6) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* 1/720 (/ (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* (pow eh 6) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (pow eh 6) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 6) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (pow eh 6) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (pow eh 4) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (/ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6)))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2)))))) (* (pow eh 6) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (* (pow eh 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))))))))))) (+ (/ 1 (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (* (pow eh 2) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6)))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (sin t) 2))) (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))) (+ (* 1/720 (/ (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 6)))) (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))))))) (* (pow eh 6) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 6) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (/ (* (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 6) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (+ (* -1 (log (/ -1 eh))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2)))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (+ (* -1 (log (/ -1 eh))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (pow eh 4))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (+ (* -1 (log (/ -1 eh))) (+ (* 1/720 (/ (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (pow eh 6))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (pow eh 4))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (- (* -1 (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (- (* ew (- (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))) (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* ew (+ (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* ew (- (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* ew (- (* ew (+ (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* ew (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* (pow ew 2) (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* (pow ew 2) (+ (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* (pow ew 2) (+ (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (* (pow ew 2) (+ (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* (pow ew 2) (* (sin t) (- (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 6) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (pow (sin t) 2)))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (pow (sin t) 2)))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 6))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* (pow eh 2) (pow (sin t) 2)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (+ (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (/ (* (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (* (pow ew 2) (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (* (pow ew 2) (+ (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (* (pow ew 2) (+ (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (* (pow ew 2) (+ (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* (pow ew 2) (* (sin t) (- (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 6) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (pow (sin t) 2)))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (pow (sin t) 2)))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 6))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* (pow eh 2) (pow (sin t) 2)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (+ (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (/ (* (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* (pow ew 2) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (/ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (/ 1 (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* (pow ew 2) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (* (pow ew 2) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (/ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (/ 1 (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* (pow ew 2) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (* (pow ew 2) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (+ (* (pow ew 2) (- (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 6) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (pow (sin t) 2)))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (pow (sin t) 2)))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 6))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* (pow eh 2) (pow (sin t) 2)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (+ (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (/ (* (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (/ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (/ 1 (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log ew) (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2)))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log ew) (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* (pow ew 2) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (pow (sin t) 2)))) (* 1/24 (* (pow ew 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log ew) (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* (pow ew 2) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (pow (sin t) 2)))) (* (pow ew 2) (+ (* 1/720 (* (pow ew 2) (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))))))))) |
#s(approx ew #s(hole binary64 ew)) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (* -1 (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (* ew (+ (* -1 (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* ew (+ (* -1 (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* ew (+ (* ew (- (* -1 (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (cos t) ew) #s(hole binary64 (* ew (cos t)))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (- (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) #s(hole binary64 (* ew (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* ew (+ (* -1 (* eh (* ew (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2))))))) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* ew (+ (* ew (+ (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))))))) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* (sqrt (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (sqrt -1)))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (sqrt -1)))) (* (sqrt (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (sqrt -1))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (* ew (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (/ (* ew (- (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* 1/4 (/ (* (pow (cos t) 2) (* (pow (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) 2) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* eh (* (sin t) (* (pow (sqrt -1) 2) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))))) (sqrt -1)))) (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (sqrt -1)))))) (* (sqrt (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (sqrt -1))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (* ew (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (sqrt -1)))) (* ew (+ (* -1/4 (* (sqrt (/ (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 3))))) (/ (* ew (* (cos t) (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (- (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* 1/4 (/ (* (pow (cos t) 2) (* (pow (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) 2) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* eh (* (sin t) (* (pow (sqrt -1) 2) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))))))) (pow (sqrt -1) 3)))) (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (/ (- (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* 1/4 (/ (* (pow (cos t) 2) (* (pow (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) 2) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* eh (* (sin t) (* (pow (sqrt -1) 2) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))) (sqrt -1)))))))) (* (sqrt (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (sqrt -1))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* ew (+ (* -1 (* eh (* ew (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2))))))) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* ew (+ (* ew (+ (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))))))) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (/ (tan t) ew) #s(hole binary64 (/ (sin t) (* ew (cos t))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (+ (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2))))))) (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* (pow ew 2) (+ (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* (pow ew 2) (+ (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* (pow ew 2) (+ (* -1 (* eh (* (sin t) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (+ (* -1/2 (/ (* (cos t) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (+ (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 3) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/720 (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/720 (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3)))))))) (+ (* -1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (+ (* -1/2 (/ (* (cos t) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (+ (* 1/720 (/ (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3)))))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (+ (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))) (/ (* (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* (pow ew 2) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (/ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (/ 1 (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* (pow ew 2) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (+ (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (pow ew 2) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (/ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (/ 1 (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* (pow ew 2) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (+ (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (pow ew 2) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* (pow ew 2) (- (+ (* -1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (+ (* -1/2 (/ (* (cos t) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (+ (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 3) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/720 (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/720 (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3)))))))) (+ (* -1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (+ (* -1/2 (/ (* (cos t) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (+ (* 1/720 (/ (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3)))))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (+ (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))) (/ (* (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (/ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (/ 1 (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (+ (* -1 (log ew)) (* 1/2 (/ (* (pow ew 2) (cos t)) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (+ (* -1 (log ew)) (* (pow ew 2) (+ (* 1/24 (* (pow ew 2) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (* 1/2 (/ (cos t) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (+ (* -1 (log ew)) (* (pow ew 2) (+ (* 1/2 (/ (cos t) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* (pow ew 2) (+ (* 1/720 (* (pow ew 2) (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))))) (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (- (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (- (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) (pow ew 2)))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 2)))) (pow ew 2)))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (+ (/ (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1/3 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))) (+ (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))))) (cos t)) (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))))) (cos t)))))))))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* 1/2 (/ (* eh (* (sin t) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t)))))) (pow ew 3)) (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 2))))) (pow ew 2)))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) ew))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 2)))) ew))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (+ (/ (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1/3 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))) (+ (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))))) (cos t)) (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))))) (cos t)))))))))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* 1/2 (/ (* eh (* (sin t) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t)))))) (pow ew 3)) (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 2))))) ew))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (* 1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew))) ew))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (* 1/2 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (pow ew 2))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* (pow ew 2) (pow (cos t) 3))))) ew))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (+ (* 1/2 (/ (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1/3 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))) (+ (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))))) (cos t)) (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))))) (cos t))))))))) (pow ew 3))) (* 1/2 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (pow ew 2)))))) (+ (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* (pow ew 2) (pow (cos t) 3)))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* (pow ew 3) (pow (cos t) 2)))) (* 1/2 (/ (* eh (* (sin t) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (* (pow ew 3) (cos t))))))) ew))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (* 1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew))) ew))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/6 (/ (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (pow ew 2))) (* 1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew)))) ew))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/24 (/ (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4)))) (pow ew 3))) (+ (* 1/6 (/ (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (pow ew 2))) (* 1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew))))) ew))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (- (+ (* -1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (- (+ (* -1 (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 4))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)) (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* ew (+ (sqrt (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) ew)) (* 1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ 1 (* (pow ew 5) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* ew (+ (sqrt (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) ew)) (+ (* -1/4 (* (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (sqrt (/ 1 (* (pow ew 7) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* 1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ 1 (* (pow ew 5) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* ew (+ (sqrt (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) ew)) (+ (* -1/2 (* (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (sqrt (/ 1 (* (pow ew 9) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (+ (* -1/4 (* (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (sqrt (/ 1 (* (pow ew 7) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* 1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ 1 (* (pow ew 5) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* (pow eh 2) (pow (sin t) 2)) (cos t))) ew))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 2))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* (pow eh 2) (pow (sin t) 2)) (cos t)))) ew))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1/3 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))) (+ (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))))) (cos t)) (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))))) (cos t)))))))))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* 1/2 (/ (* eh (* (sin t) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t))))))) (pow ew 3))) (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 2))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* (pow eh 2) (pow (sin t) 2)) (cos t))))) ew))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (* 1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew))) ew))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (* 1/2 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (pow ew 2))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* (pow ew 2) (pow (cos t) 3))))) ew))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (+ (* 1/2 (/ (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1/3 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))) (+ (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))))) (cos t)) (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))))) (cos t))))))))) (pow ew 3))) (* 1/2 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (pow ew 2)))))) (+ (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* (pow ew 2) (pow (cos t) 3)))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* (pow ew 3) (pow (cos t) 2)))) (* 1/2 (/ (* eh (* (sin t) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (* (pow ew 3) (cos t))))))) ew))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (* 1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew))) ew))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/6 (/ (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (pow ew 2))) (* 1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew)))) ew))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/24 (/ (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4)))) (pow ew 3))) (+ (* 1/6 (/ (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (pow ew 2))) (* 1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew))))) ew))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* -1 (/ (- (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (* -1 (/ (+ (* -1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew)) ew))) (pow ew 2)))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (/ (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/3 (/ (* eh (* (sin t) (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))))))))))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (cos t))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2)))))) ew)) ew)) (* -1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) ew))) (pow ew 2)))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* eh (pow (sin t) 2)) (cos t))) ew)))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew)) (* 1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) ew)) (/ (* eh (pow (sin t) 2)) (cos t))) ew)))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/3 (/ (* eh (* (sin t) (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))))))))))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (cos t))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2)))))) ew)) (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* 1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) ew)) (/ (* eh (pow (sin t) 2)) (cos t))) ew)))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (* 1/2 (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/3 (/ (* eh (* (sin t) (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))))))))))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (cos t))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))))) ew)) (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t)))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (* 1/2 (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/24 (/ (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4)))) ew)) (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (- (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))) (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (- (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew) (* 1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (pow ew 3)))) (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))) (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* (sqrt (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (pow (sqrt -1) 2))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* ew (+ (* 1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ 1 (* (pow ew 5) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* (sqrt (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) ew)) (pow (sqrt -1) 2))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ ew (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/4 (* (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (sqrt (/ 1 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) (pow ew 3))) (* (sqrt (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) ew)) (pow (sqrt -1) 2))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (sqrt (/ ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/2 (* (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (sqrt (/ 1 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) ew)) (* -1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ ew (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (pow ew 3))) (* (sqrt (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) ew)) (pow (sqrt -1) 2))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (cos t))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew))) ew)))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (cos t))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) ew))) ew)))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (cos t))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/3 (/ (* eh (* (sin t) (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))))))))))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (cos t))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))))))) ew)) ew)) (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) ew))) ew)))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (* 1/2 (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/3 (/ (* eh (* (sin t) (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))))))))))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (cos t))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))))) ew)) (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t)))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (* 1/2 (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/24 (/ (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4)))) ew)) (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* -1/2 (* ew (* t (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* t (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/6 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* -1 (* ew (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow t 2) (- (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow t 2) (- (* t (- (* -1 (* ew (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* ew (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* 1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* t (+ (* 1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* ew (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) ew))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* t (+ (* 1/2 (/ (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) ew)) (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* -1 (/ (* eh (pow t 2)) (pow ew 2))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ eh (pow ew 2))) (* 1/2 (/ (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) ew)))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ eh (pow ew 2))) (* t (+ (* 1/2 (/ (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (+ (* 1/6 (/ eh (pow ew 2))) (* 1/2 (/ (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))) ew))) (* -1/2 (/ (pow eh 3) (pow ew 4))))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ eh (pow ew 2))) (* t (+ (* 1/2 (/ (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (+ (* 1/6 (/ eh (pow ew 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))) ew)) (* t (- (+ (* -1/12 (/ (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))) ew)) (* 1/2 (/ (+ (* -1 (* (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (+ (* -1/3 (/ (* eh (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) ew)) (+ (* 1/12 (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4)))))))) (+ (* 1/12 (/ (pow eh 4) (pow ew 4))) (+ (* 1/4 (pow (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (pow ew 2))) (+ (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))))) ew) (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (+ (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) ew)))))))) ew))) (+ (* 1/4 (/ (* (pow eh 2) (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (pow ew 3))) (* 1/2 (/ (* eh (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))) (pow ew 2)))))))) (* -1/2 (/ (pow eh 3) (pow ew 4))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* -1 (/ (* eh (pow t 2)) ew)))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ eh ew)) (* 1/2 (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* t (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* t (- (+ (* 1/6 (/ eh ew)) (+ (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) (* t (- (+ (* -1/12 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (+ (* -1/3 (/ (* eh (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) ew)) (+ (* 1/12 (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4)))))))) (+ (* 1/12 (/ (pow eh 4) (pow ew 4))) (+ (* 1/4 (pow (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (pow ew 2))) (+ (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))))) ew) (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (+ (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) ew)))))))))) (+ (* 1/4 (/ (* (pow eh 2) (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (* 1/2 (/ (* eh (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* 1/2 (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* t (- (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* t (- (+ (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) (* t (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (+ (* -1/3 (/ (* eh (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) ew)) (+ (* 1/12 (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4)))))))) (+ (* 1/12 (/ (pow eh 4) (pow ew 4))) (+ (* 1/4 (pow (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (pow ew 2))) (+ (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))))) ew) (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (+ (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) ew))))))))) (+ (* 1/4 (/ (* (pow eh 2) (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (* 1/2 (/ (* eh (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))) ew)))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* 1/2 (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/6 (* t (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))) (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* t (+ (* 1/24 (* t (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4))))))))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))))))))))) |
#s(approx (neg (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (neg (* (/ eh ew) (tan t))) #s(hole binary64 (* t (- (* -1/3 (/ (* eh (pow t 2)) ew)) (/ eh ew))))) |
#s(approx (neg (* (/ eh ew) (tan t))) #s(hole binary64 (* t (- (* (pow t 2) (- (* -2/15 (/ (* eh (pow t 2)) ew)) (* 1/3 (/ eh ew)))) (/ eh ew))))) |
#s(approx (neg (* (/ eh ew) (tan t))) #s(hole binary64 (* t (- (* (pow t 2) (- (* (pow t 2) (- (* -17/315 (/ (* eh (pow t 2)) ew)) (* 2/15 (/ eh ew)))) (* 1/3 (/ eh ew)))) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (/ (* eh t) ew))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* 1/3 (/ (* eh (pow t 2)) ew)) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 2/15 (/ (* eh (pow t 2)) ew)) (* 1/3 (/ eh ew)))) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 1/3 (/ eh ew)) (* (pow t 2) (+ (* 17/315 (/ (* eh (pow t 2)) ew)) (* 2/15 (/ eh ew)))))) (/ eh ew))))) |
#s(approx (tan t) #s(hole binary64 t)) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* 1/3 (pow t 2)))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* 2/15 (pow t 2)))))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* (pow t 2) (+ 2/15 (* 17/315 (pow t 2)))))))))) |
#s(approx t #s(hole binary64 t)) |
#s(approx (sin t) #s(hole binary64 t)) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* -1/6 (pow t 2)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* 1/120 (pow t 2)) 1/6)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/120 (* -1/5040 (pow t 2)))) 1/6)))))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) #s(hole binary64 (* -1 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) #s(hole binary64 (- (* 1/2 (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) #s(hole binary64 (- (* (pow t 2) (- (* -1/24 (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) #s(hole binary64 (- (* (pow t 2) (- (* (pow t 2) (- (* 1/720 (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) #s(hole binary64 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) #s(hole binary64 (+ (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))) (* -1/2 (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) #s(hole binary64 (+ (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/24 (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) #s(hole binary64 (+ (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/720 (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (cos t) #s(hole binary64 1)) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* -1/2 (pow t 2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* 1/24 (pow t 2)) 1/2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/24 (* -1/720 (pow t 2)))) 1/2))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* eh (* (pow t 2) (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew))))) (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* eh (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* eh (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew)))) (* t (+ (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* eh (* t (- (+ (* -1/2 (/ (pow eh 3) (pow ew 3))) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (+ (* -1/2 (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (+ (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* t (- (* t (- (+ (* -1/2 (/ (pow eh 3) (pow ew 3))) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))))) (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* -1/2 (/ (* ew (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* 1/24 (/ (* ew (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* (pow t 2) (+ (* -1/720 (/ (* ew (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (* -1/2 (* ew (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (* ew (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* -1/720 (* ew (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/24 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))))) |
#s(approx (* (cos t) ew) #s(hole binary64 ew)) |
#s(approx (* (cos t) ew) #s(hole binary64 (+ ew (* -1/2 (* ew (pow t 2)))))) |
#s(approx (* (cos t) ew) #s(hole binary64 (+ ew (* (pow t 2) (+ (* -1/2 ew) (* 1/24 (* ew (pow t 2)))))))) |
#s(approx (* (cos t) ew) #s(hole binary64 (+ ew (* (pow t 2) (+ (* -1/2 ew) (* (pow t 2) (+ (* -1/720 (* ew (pow t 2))) (* 1/24 ew)))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))) (* t (- (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))) (* t (- (+ (* -1/2 (* ew (* t (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))))) (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI)))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))) (* t (- (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI))))) (* t (+ (* -1/2 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI)))))) (* t (- (* -1/6 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI)))))) (* -1/6 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (+ (* ew (* t (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI)))))) (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI)))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))) (* t (+ (* -1/2 (* ew (* t (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))))) (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI)))))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))) (* t (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI))))) (* t (+ (* -1/2 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI)))))) (* -1/6 (* ew (* t (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI)))))))))))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) #s(hole binary64 (* ew (sin (* 1/2 (PI)))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* ew (sin (* 1/2 (PI)))) (* ew (* t (cos (* 1/2 (PI)))))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* ew (sin (* 1/2 (PI)))) (* t (+ (* -1/2 (* ew (* t (sin (* 1/2 (PI)))))) (* ew (cos (* 1/2 (PI))))))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* ew (sin (* 1/2 (PI)))) (* t (+ (* ew (cos (* 1/2 (PI)))) (* t (+ (* -1/2 (* ew (sin (* 1/2 (PI))))) (* -1/6 (* ew (* t (cos (* 1/2 (PI))))))))))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* t (cos (* 1/2 (PI))))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* t (+ (cos (* 1/2 (PI))) (* -1/2 (* t (sin (* 1/2 (PI)))))))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* t (+ (cos (* 1/2 (PI))) (* t (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* t (cos (* 1/2 (PI)))))))))))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1/2 (* (pow t 2) (sin (* 1/2 (PI)))))))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow t 2) (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/24 (* (pow t 2) (sin (* 1/2 (PI)))))))))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow t 2) (+ (* -1/2 (sin (* 1/2 (PI)))) (* (pow t 2) (+ (* -1/720 (* (pow t 2) (sin (* 1/2 (PI))))) (* 1/24 (sin (* 1/2 (PI))))))))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* -1/3 (/ (* eh (pow t 2)) ew)))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* (pow t 2) (+ (* -1/3 (/ eh ew)) (* -2/15 (/ (* eh (pow t 2)) ew)))))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* (pow t 2) (+ (* -1/3 (/ eh ew)) (* (pow t 2) (+ (* -2/15 (/ eh ew)) (* -17/315 (/ (* eh (pow t 2)) ew)))))))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* -1 (* eh t)))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* t (+ (* -1 eh) (* -1/3 (* eh (pow t 2))))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* t (+ (* -1 eh) (* (pow t 2) (+ (* -1/3 eh) (* -2/15 (* eh (pow t 2))))))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* t (+ (* -1 eh) (* (pow t 2) (+ (* -1/3 eh) (* (pow t 2) (+ (* -2/15 eh) (* -17/315 (* eh (pow t 2))))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* t (+ (* -1/6 (* eh (* (pow t 2) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* t (+ (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/6 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/120 (* eh (* (pow t 2) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* t (+ (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/6 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* -1/5040 (* eh (* (pow t 2) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/120 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* eh t))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* -1/6 (* eh (pow t 2))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* 1/120 (* eh (pow t 2))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* (pow t 2) (+ (* -1/5040 (* eh (pow t 2))) (* 1/120 eh))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* t (+ (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* t (+ (* -1 (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3)))))) (* 1/24 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (/ (pow eh 2) ew))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (sqrt (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (sqrt (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/2 (* (sqrt (/ 1 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew)))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (sqrt (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* -1/4 (* (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (sqrt (/ 1 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/2 (* (sqrt (/ 1 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (sqrt (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* 1/2 (* (sqrt (/ 1 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew)))) (* t (+ (* -1/4 (* (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (sqrt (/ 1 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/2 (* (sqrt (/ 1 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* t (- (+ (* -1 (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3)))))) (* 1/24 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/4 (/ (pow (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew)) 2) (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew)))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* t (+ (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* t (+ (* -1 (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3)))))) (* 1/24 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (/ (pow eh 2) ew))))))) |
#s(approx (* (neg eh) (/ (tan t) ew)) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (* (neg eh) (/ (tan t) ew)) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* -1/3 (/ (* eh (pow t 2)) ew)))))) |
#s(approx (* (neg eh) (/ (tan t) ew)) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* (pow t 2) (+ (* -1/3 (/ eh ew)) (* -2/15 (/ (* eh (pow t 2)) ew)))))))) |
#s(approx (* (neg eh) (/ (tan t) ew)) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* (pow t 2) (+ (* -1/3 (/ eh ew)) (* (pow t 2) (+ (* -2/15 (/ eh ew)) (* -17/315 (/ (* eh (pow t 2)) ew)))))))))) |
#s(approx (/ (tan t) ew) #s(hole binary64 (/ t ew))) |
#s(approx (/ (tan t) ew) #s(hole binary64 (* t (+ (* 1/3 (/ (pow t 2) ew)) (/ 1 ew))))) |
#s(approx (/ (tan t) ew) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 2/15 (/ (pow t 2) ew)) (* 1/3 (/ 1 ew)))) (/ 1 ew))))) |
#s(approx (/ (tan t) ew) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* (pow t 2) (+ (* 17/315 (/ (pow t 2) ew)) (* 2/15 (/ 1 ew)))) (* 1/3 (/ 1 ew)))) (/ 1 ew))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (/ (* (pow eh 2) (pow t 2)) ew))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (/ (pow eh 2) ew))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* (pow t 2) (+ (* t (+ (* -1 (* eh (* t (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))) (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (/ (pow eh 2) ew))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* (pow t 2) (+ (* t (+ (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* t (+ (* -1 (* eh (* t (- (+ (* -1/12 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (+ (* -1/3 (/ (* eh (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) ew)) (+ (* 1/12 (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4)))))))) (+ (* 1/12 (/ (pow eh 4) (pow ew 4))) (+ (* 1/4 (pow (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (pow ew 2))) (+ (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))))) ew) (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (+ (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) ew)))))))))) (+ (* 1/4 (/ (* (pow eh 2) (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (* 1/2 (/ (* eh (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))) ew))))))) (* -1 (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3)))))))))) (/ (pow eh 2) ew))))) |
#s(approx (neg (* (sin t) eh)) #s(hole binary64 (* -1 (* eh t)))) |
#s(approx (neg (* (sin t) eh)) #s(hole binary64 (* t (- (* 1/6 (* eh (pow t 2))) eh)))) |
#s(approx (neg (* (sin t) eh)) #s(hole binary64 (* t (- (* (pow t 2) (- (* -1/120 (* eh (pow t 2))) (* -1/6 eh))) eh)))) |
#s(approx (neg (* (sin t) eh)) #s(hole binary64 (* t (- (* (pow t 2) (- (* (pow t 2) (- (* 1/5040 (* eh (pow t 2))) (* 1/120 eh))) (* -1/6 eh))) eh)))) |
#s(approx (* (sin t) eh) #s(hole binary64 (* eh t))) |
#s(approx (* (sin t) eh) #s(hole binary64 (* t (+ eh (* -1/6 (* eh (pow t 2))))))) |
#s(approx (* (sin t) eh) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* 1/120 (* eh (pow t 2))))))))) |
#s(approx (* (sin t) eh) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* (pow t 2) (+ (* -1/5040 (* eh (pow t 2))) (* 1/120 eh))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* 1/2 (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* t (- (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* t (- (+ (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) (* t (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (+ (* -1/3 (/ (* eh (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) ew)) (+ (* 1/12 (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4)))))))) (+ (* 1/12 (/ (pow eh 4) (pow ew 4))) (+ (* 1/4 (pow (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (pow ew 2))) (+ (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))))) ew) (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (+ (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) ew))))))))) (+ (* 1/4 (/ (* (pow eh 2) (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (* 1/2 (/ (* eh (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))) ew)))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* 1/2 (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/6 (* t (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))) (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* t (+ (* 1/24 (* t (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4))))))))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (log (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (tan t) #s(hole binary64 (/ (sin t) (cos t)))) |
#s(approx (sin t) #s(hole binary64 (sin t))) |
#s(approx (cos t) #s(hole binary64 (cos t))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) #s(hole binary64 (* (cos t) (sin (* 1/2 (PI)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (sqrt (+ (* -1 (/ (* eh (* (sin t) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (log (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) |
9 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 129.0ms | ew | @ | 0 | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (tanh (asinh (neg (* (/ eh ew) (tan t))))) (asinh (neg (* (/ eh ew) (tan t)))) (neg (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (/ eh ew) ew (tan t) t (sin t) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) (cos (atan (neg (* (/ eh ew) (tan t))))) (atan (neg (* (/ eh ew) (tan t)))) (cos t) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) (* (cos t) ew) (fabs (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos t) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (cos (atan (/ (* (neg eh) (tan t)) ew))) (atan (/ (* (neg eh) (tan t)) ew)) (/ (* (neg eh) (tan t)) ew) (* (neg eh) (tan t)) (neg eh) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))) (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) (cos (atan (* (neg eh) (/ (tan t) ew)))) (atan (* (neg eh) (/ (tan t) ew))) (* (neg eh) (/ (tan t) ew)) (/ (tan t) ew) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (neg (* (sin t) eh)) (* (sin t) eh) (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (asinh (* (neg eh) (/ (tan t) ew)))) |
| 123.0ms | t | @ | inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (tanh (asinh (neg (* (/ eh ew) (tan t))))) (asinh (neg (* (/ eh ew) (tan t)))) (neg (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (/ eh ew) ew (tan t) t (sin t) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) (cos (atan (neg (* (/ eh ew) (tan t))))) (atan (neg (* (/ eh ew) (tan t)))) (cos t) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) (* (cos t) ew) (fabs (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos t) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (cos (atan (/ (* (neg eh) (tan t)) ew))) (atan (/ (* (neg eh) (tan t)) ew)) (/ (* (neg eh) (tan t)) ew) (* (neg eh) (tan t)) (neg eh) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))) (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) (cos (atan (* (neg eh) (/ (tan t) ew)))) (atan (* (neg eh) (/ (tan t) ew))) (* (neg eh) (/ (tan t) ew)) (/ (tan t) ew) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (neg (* (sin t) eh)) (* (sin t) eh) (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (asinh (* (neg eh) (/ (tan t) ew)))) |
| 117.0ms | eh | @ | -inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (tanh (asinh (neg (* (/ eh ew) (tan t))))) (asinh (neg (* (/ eh ew) (tan t)))) (neg (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (/ eh ew) ew (tan t) t (sin t) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) (cos (atan (neg (* (/ eh ew) (tan t))))) (atan (neg (* (/ eh ew) (tan t)))) (cos t) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) (* (cos t) ew) (fabs (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos t) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (cos (atan (/ (* (neg eh) (tan t)) ew))) (atan (/ (* (neg eh) (tan t)) ew)) (/ (* (neg eh) (tan t)) ew) (* (neg eh) (tan t)) (neg eh) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))) (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) (cos (atan (* (neg eh) (/ (tan t) ew)))) (atan (* (neg eh) (/ (tan t) ew))) (* (neg eh) (/ (tan t) ew)) (/ (tan t) ew) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (neg (* (sin t) eh)) (* (sin t) eh) (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (asinh (* (neg eh) (/ (tan t) ew)))) |
| 114.0ms | eh | @ | inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (tanh (asinh (neg (* (/ eh ew) (tan t))))) (asinh (neg (* (/ eh ew) (tan t)))) (neg (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (/ eh ew) ew (tan t) t (sin t) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) (cos (atan (neg (* (/ eh ew) (tan t))))) (atan (neg (* (/ eh ew) (tan t)))) (cos t) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) (* (cos t) ew) (fabs (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos t) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (cos (atan (/ (* (neg eh) (tan t)) ew))) (atan (/ (* (neg eh) (tan t)) ew)) (/ (* (neg eh) (tan t)) ew) (* (neg eh) (tan t)) (neg eh) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))) (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) (cos (atan (* (neg eh) (/ (tan t) ew)))) (atan (* (neg eh) (/ (tan t) ew))) (* (neg eh) (/ (tan t) ew)) (/ (tan t) ew) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (neg (* (sin t) eh)) (* (sin t) eh) (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (asinh (* (neg eh) (/ (tan t) ew)))) |
| 77.0ms | t | @ | -inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (tanh (asinh (neg (* (/ eh ew) (tan t))))) (asinh (neg (* (/ eh ew) (tan t)))) (neg (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (/ eh ew) ew (tan t) t (sin t) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) (cos (atan (neg (* (/ eh ew) (tan t))))) (atan (neg (* (/ eh ew) (tan t)))) (cos t) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) (* (cos t) ew) (fabs (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (cos (/ (PI) 2)) (/ (PI) 2) (PI) 2 (* (cos t) (sin (/ (PI) 2))) (sin (/ (PI) 2)) (cos (atan (/ (* (neg eh) (tan t)) ew))) (atan (/ (* (neg eh) (tan t)) ew)) (/ (* (neg eh) (tan t)) ew) (* (neg eh) (tan t)) (neg eh) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))) (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) (cos (atan (* (neg eh) (/ (tan t) ew)))) (atan (* (neg eh) (/ (tan t) ew))) (* (neg eh) (/ (tan t) ew)) (/ (tan t) ew) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (neg (* (sin t) eh)) (* (sin t) eh) (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (asinh (* (neg eh) (/ (tan t) ew)))) |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 4042 | 241022 |
| 0 | 4161 | 225277 |
| 0 | 13995 | 219236 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew))) |
(neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)) |
(*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew) |
(fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) |
eh |
(/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) |
(*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) |
(tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(*.f64 (/.f64 eh ew) (tan.f64 t)) |
(/.f64 eh ew) |
ew |
(tan.f64 t) |
t |
(sin.f64 t) |
(neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t))) |
(*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)) |
(cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(cos.f64 t) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh)) |
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh) |
(-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) |
(/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) |
(*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(*.f64 (cos.f64 t) ew) |
(fabs.f64 (-.f64 (*.f64 (*.f64 ew (fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
(-.f64 (*.f64 (*.f64 ew (fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
(*.f64 (*.f64 ew (fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) |
(*.f64 ew (fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) |
(fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))) |
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(PI.f64) |
#s(literal 2 binary64) |
(*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) |
(cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))) |
(atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)) |
(/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew) |
(*.f64 (neg.f64 eh) (tan.f64 t)) |
(neg.f64 eh) |
(*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) |
(*.f64 eh (sin.f64 t)) |
(sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))) |
(*.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) |
(fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) |
(atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))) |
(*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) |
(/.f64 (tan.f64 t) ew) |
(*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) |
(neg.f64 (*.f64 (sin.f64 t) eh)) |
(*.f64 (sin.f64 t) eh) |
(tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) |
(asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))) |
#s(approx (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) #s(hole binary64 (fabs (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow eh 2) (- (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t)))))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow eh 2) (- (* eh (- (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t)))))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* eh (+ (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) ew)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* eh (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) ew)) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) ew))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx eh #s(hole binary64 eh)) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) ew)))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* eh (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) ew)) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) ew))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* eh (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) ew)) (* eh (+ (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (+ (* -1/3 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (* ew (cos t)))) (+ (* 1/12 (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))))) (+ (* 1/12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (+ (* 1/4 (pow (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) 2)) (+ (* 1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))) (* ew (cos t))) (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* ew (cos t))))))))))) (+ (* 1/4 (/ (* (pow (sin t) 2) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (sin t) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))))) ew) (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) ew))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* -1 (/ (* eh (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* eh (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* eh (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* eh (+ (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* eh (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* eh (+ (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* eh (+ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (+ (* -1/3 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (* ew (cos t)))) (+ (* 1/12 (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))))) (+ (* 1/12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (+ (* 1/4 (pow (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) 2)) (+ (* 1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))) (* ew (cos t))) (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* ew (cos t))))))))))) (+ (* 1/4 (/ (* (pow (sin t) 2) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (sin t) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))))) (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* 1/2 (* eh (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/2 (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/2 (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (+ (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* eh (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (+ (* -1/3 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (* ew (cos t)))) (+ (* 1/12 (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))))) (+ (* 1/12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (+ (* 1/4 (pow (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) 2)) (+ (* 1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))) (* ew (cos t))) (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* ew (cos t))))))))))) (+ (* 1/4 (/ (* (pow (sin t) 2) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (sin t) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* 1/2 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/6 (* eh (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* eh (+ (* 1/24 (* eh (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4))))))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))))) |
#s(approx (neg (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (/ (* eh (sin t)) (* ew (cos t))))) |
#s(approx (/ eh ew) #s(hole binary64 (/ eh ew))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) #s(hole binary64 (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) #s(hole binary64 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (cos (atan (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (atan (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (- (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (- (* eh (- (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))) eh))) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (fabs (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) #s(hole binary64 (fabs (- (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t)))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))))) |
#s(approx (cos (atan (/ (* (neg eh) (tan t)) ew))) #s(hole binary64 (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (atan (/ (* (neg eh) (tan t)) ew)) #s(hole binary64 (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* -1 (/ (* eh (sin t)) (cos t))))) |
#s(approx (neg eh) #s(hole binary64 (* -1 eh))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* eh (sin t)))) |
#s(approx (sin (atan (/ (* (neg eh) (tan t)) ew))) #s(hole binary64 (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (sqrt (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (sqrt (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ 1 (* (pow ew 3) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (sqrt (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1/4 (* (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (sqrt (/ 1 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* 1/2 (* (sqrt (/ 1 (* (pow ew 3) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) (pow (sin t) 2)))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (sqrt (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* 1/2 (* (sqrt (/ 1 (* (pow ew 3) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) (pow (sin t) 2))) (* eh (+ (* -1/4 (* (sqrt (/ 1 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* 1/2 (* (* eh (- (* -1 (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) (* 1/4 (/ (pow (sin t) 4) (* (pow ew 3) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (sqrt (/ 1 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (cos (atan (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (atan (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (* (neg eh) (/ (tan t) ew)) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* (pow eh 2) (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (/ (pow (sin t) 2) (* ew (cos t))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* (pow eh 2) (+ (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (/ (pow (sin t) 2) (* ew (cos t))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* (pow eh 2) (+ (* eh (+ (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (+ (* -1/3 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (* ew (cos t)))) (+ (* 1/12 (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))))) (+ (* 1/12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (+ (* 1/4 (pow (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) 2)) (+ (* 1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))) (* ew (cos t))) (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* ew (cos t))))))))))) (+ (* 1/4 (/ (* (pow (sin t) 2) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (sin t) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t))))))))) (* -1 (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))))) (/ (pow (sin t) 2) (* ew (cos t))))))) |
#s(approx (neg (* (sin t) eh)) #s(hole binary64 (* -1 (* eh (sin t))))) |
#s(approx (* (sin t) eh) #s(hole binary64 (* eh (sin t)))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* 1/2 (* eh (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/2 (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/2 (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (+ (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* eh (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (+ (* -1/3 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (* ew (cos t)))) (+ (* 1/12 (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))))) (+ (* 1/12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (+ (* 1/4 (pow (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) 2)) (+ (* 1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))))) (* ew (cos t))) (/ (* (sin t) (+ (* -1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/6 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* ew (cos t))))))))))) (+ (* 1/4 (/ (* (pow (sin t) 2) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (sin t) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* 1/2 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/6 (* eh (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* eh (+ (* 1/24 (* eh (+ (* -12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 12 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4))))))) (* 1/6 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (- (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (- (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) ew)))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) ew)))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew)) (+ (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) ew)) (/ (* (sin t) (- (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 6) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))))))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 6)))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (+ (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (* (pow eh 6) ew))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4)))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)) (+ (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4)) (/ (* (sin t) (- (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 6) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))))))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 6)))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (+ (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (pow eh 6))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (+ (/ 1 (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (* (pow eh 2) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (pow eh 4) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (* (pow eh 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))))) (+ (/ 1 (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (* (pow eh 2) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2))) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (pow eh 6) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (pow eh 6) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 6) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* (pow eh 6) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (pow eh 4) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 6) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (pow eh 6) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (/ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))))))) (* (pow eh 6) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (* (pow eh 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))))))))))) (+ (/ 1 (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (* (pow eh 2) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))))))) (+ (* -1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))) (+ (* -1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 6)))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))))))) (* (pow eh 6) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2))) (+ (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 6) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 6) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (+ (log (/ 1 eh)) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2)))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (+ (log (/ 1 eh)) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (pow eh 4)))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (+ (log (/ 1 eh)) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2)))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (+ (* -15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (pow eh 6))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (pow eh 4))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (+ (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* eh (- (/ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))) eh) (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (pow eh 4))) (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* (sqrt (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (sqrt -1)))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* eh (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (pow eh 3) (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (sqrt -1)))) (* (sqrt (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (* eh (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (sqrt -1)))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* eh (+ (* -1/2 (* (sqrt (/ (* (sin t) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (* (pow eh 5) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (/ (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (sqrt -1)))) (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (pow eh 3) (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (sqrt -1)))) (* (sqrt (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (* eh (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (sqrt -1))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* eh (+ (* -1/2 (* (sqrt (/ (* (sin t) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (* (pow eh 5) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (/ (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (sqrt -1)))) (+ (* -1/8 (* (sqrt (/ (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 3) (* (pow eh 5) (* (pow (sin t) 3) (pow (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 3))))) (/ (* (pow ew 2) (* (pow (cos t) 2) (pow (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) 2))) (pow (sqrt -1) 3)))) (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (pow eh 3) (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (sqrt -1)))) (* (sqrt (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (* eh (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (sqrt -1)))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (pow eh 4))) (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (pow eh 4))) (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2)))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (+ (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 3) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (/ (* (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))))) (pow eh 6))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (pow eh 4))) (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (pow eh 2))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (pow eh 2) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (/ 1 (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (pow eh 2) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (pow eh 4) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (pow eh 2) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (+ (/ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (* (pow eh 4) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))))))) (+ (/ 1 (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (pow eh 2) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (* (pow eh 6) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (* (pow eh 6) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* (pow eh 6) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (pow eh 6) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 6) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 3) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (pow eh 4) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (pow eh 2) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (+ (/ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))) (+ (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))) (* (pow eh 6) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (* (pow eh 4) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))))))))))))) (+ (/ 1 (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (pow eh 2) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3))))))))))) (* (pow eh 6) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2))) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (/ (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))))) (* (pow eh 6) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))))) (/ (* (- (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))))) 2)))) (* (pow eh 6) (+ (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh))))) (/ 1 (exp (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))))))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1 (log (/ 1 eh)))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (+ (* -1 (log (/ 1 eh))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (+ (* -1 (log (/ 1 eh))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (pow eh 4))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (+ (* -1 (log (/ 1 eh))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (pow eh 6))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) (pow eh 4))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (- (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (- (* -1 (/ (- (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2)) (* -1 (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))))) eh)) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) eh))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (+ (* -1 (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))) (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2)))) eh))) eh))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (* -1 (/ (- (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* eh ew)) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (* -1 (/ (- (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 2) ew))) (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) ew))) eh)) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 2) ew))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 4) ew)) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 2) ew)))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (sin t) (- (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 3) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (/ (* (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))) (* (pow eh 6) ew)) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 4) ew)) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 2) ew))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (pow eh 2))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 4)) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (pow eh 2)))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 3) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (/ (* (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))) (pow eh 6)) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 4)) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (pow eh 2))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 2) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (/ 1 (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (pow eh 2) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (pow eh 4) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 2) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (/ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))))) (+ (/ 1 (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (pow eh 2) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (pow eh 6) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (pow eh 6) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* (pow eh 6) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (pow eh 6) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 6) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 3) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (pow eh 4) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 2) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (/ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (* (pow eh 6) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))))))))))) (+ (/ 1 (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (pow eh 2) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (+ (* 1/48 (/ (* ew (* (cos t) (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* 1/48 (/ (* (pow ew 3) (pow (cos t) 3)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))))))))) (* (pow eh 6) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 6) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 6) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (* -1 (log (/ -1 eh))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (* -1 (log (/ -1 eh))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (pow eh 4))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (* -1 (log (/ -1 eh))) (+ (* 1/720 (/ (+ (* 30 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* 45 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 45 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (pow eh 6))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (pow eh 4))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (+ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) eh)) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (- (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))) eh))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))) eh)) (* -1 (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (+ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) eh)) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* (sqrt (/ (* eh (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (sqrt -1))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* eh (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 3) (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* ew (* (cos t) (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sqrt -1)))))) (* (sqrt (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (* eh (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (sqrt -1))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* eh (+ (* -1/2 (* (sqrt (/ (* (sin t) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (* (pow eh 5) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* (sqrt -1) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))))) (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 3) (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* ew (* (cos t) (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sqrt -1)))))) (* (sqrt (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (* eh (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (sqrt -1)))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* 1/8 (* (sqrt (/ (* eh (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 3)) (* (pow (sin t) 3) (pow (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 3)))) (* (pow ew 2) (* (pow (cos t) 2) (* (pow (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) 2) (sqrt -1)))))) (* 1/2 (* (sqrt (/ (* eh (* (sin t) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (* (sqrt -1) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))))))) (pow eh 3))) (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 3) (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* ew (* (cos t) (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sqrt -1)))))) (* (sqrt (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (* eh (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (sqrt -1)))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (+ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) eh)) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (* eh (+ (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (/ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (pow eh 2))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (* eh (+ (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 4)) (/ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (pow eh 2)))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (* eh (+ (/ (* (sin t) (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/720 (/ (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 6) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6)))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2)))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6)))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (sin t) 2))) (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))) (+ (* 1/720 (/ (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 6)))) (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (+ (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (/ (* (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (pow eh 6)) (+ (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 4)) (/ (* (sin t) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (pow eh 2))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (+ (/ 1 (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (* (pow eh 2) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (pow eh 4) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (/ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (* (pow eh 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))))) (+ (/ 1 (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (* (pow eh 2) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 6) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (pow eh 6) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* 1/720 (/ (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* (pow eh 6) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (pow eh 6) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 6) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (pow eh 6) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (pow eh 4) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (+ (/ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))) (+ (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6)))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2)))))) (* (pow eh 6) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (* (pow eh 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))))))))))))) (+ (/ 1 (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (* (pow eh 2) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/720 (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6)))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (pow (sin t) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (sin t) 2))) (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))) (+ (* 1/720 (/ (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (+ (* 1/384 (/ (* (pow ew 6) (pow (cos t) 6)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 6)))) (* 1/96 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))))))) (* (pow eh 6) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 4) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2))) (+ (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 6) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (+ (/ (* (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 4) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))))) (/ (* (- (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (- (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))) (/ (* (- (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (- (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) (pow (sin t) 2))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))))) 2)))) (* (pow eh 6) (+ (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))))))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (* -1 (log (/ -1 eh)))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (+ (* -1 (log (/ -1 eh))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2)))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (+ (* -1 (log (/ -1 eh))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (pow eh 4))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (* 2 (/ (sin t) (* ew (cos t))))) (+ (* -1 (log (/ -1 eh))) (+ (* 1/720 (/ (+ (* 15/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (+ (* 45/4 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 45/2 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (pow eh 6))) (+ (* 1/24 (/ (+ (* -3/2 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (pow eh 4))) (* 1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (- (* -1 (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (- (* ew (- (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))) (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* ew (+ (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* ew (- (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* ew (- (* ew (+ (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* ew (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* (pow ew 2) (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* (pow ew 2) (+ (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* (pow ew 2) (+ (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (* (pow ew 2) (+ (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* (pow ew 2) (* (sin t) (- (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 6) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (pow (sin t) 2)))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (pow (sin t) 2)))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 6))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* (pow eh 2) (pow (sin t) 2)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (+ (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (/ (* (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (* (pow ew 2) (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (* (pow ew 2) (+ (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (+ (* (pow ew 2) (+ (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (* (pow ew 2) (+ (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* (pow ew 2) (* (sin t) (- (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 6) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (pow (sin t) 2)))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (pow (sin t) 2)))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 6))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* (pow eh 2) (pow (sin t) 2)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (+ (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (/ (* (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* (pow ew 2) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (/ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (/ 1 (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* (pow ew 2) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (* (pow ew 2) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (/ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (/ 1 (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (- (+ (* (pow ew 2) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (* (pow ew 2) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (+ (* (pow ew 2) (- (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 6) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (pow (sin t) 2)))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (pow (sin t) 2)))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/720 (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))))) (+ (* -1/96 (/ (* (pow (cos t) 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))) (+ (* -1/384 (/ (pow (cos t) 6) (* (pow eh 6) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 6))))) (+ (* 1/720 (/ (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (+ (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* (pow eh 2) (pow (sin t) 2)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (+ (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (/ (* (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (/ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (/ 1 (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log ew) (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 2) (pow (sin t) 2)))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log ew) (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* (pow ew 2) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (pow (sin t) 2)))) (* 1/24 (* (pow ew 2) (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (log ew) (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* (pow ew 2) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (pow (sin t) 2)))) (* (pow ew 2) (+ (* 1/720 (* (pow ew 2) (+ (* -720 (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))) (+ (* -15/4 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 45/2 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))))))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))))))))) |
#s(approx ew #s(hole binary64 ew)) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (* -1 (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (* ew (+ (* -1 (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* ew (+ (* -1 (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* ew (+ (* ew (- (* -1 (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (cos t) ew) #s(hole binary64 (* ew (cos t)))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (- (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) #s(hole binary64 (* ew (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* ew (+ (* -1 (* eh (* ew (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2))))))) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* ew (+ (* ew (+ (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))))))) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* (sqrt (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (sqrt -1)))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (sqrt -1)))) (* (sqrt (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (sqrt -1))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (* ew (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (/ (* ew (- (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* 1/4 (/ (* (pow (cos t) 2) (* (pow (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) 2) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* eh (* (sin t) (* (pow (sqrt -1) 2) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))))) (sqrt -1)))) (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (sqrt -1)))))) (* (sqrt (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (sqrt -1))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (* ew (+ (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (sqrt -1)))) (* ew (+ (* -1/4 (* (sqrt (/ (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 3))))) (/ (* ew (* (cos t) (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (- (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* 1/4 (/ (* (pow (cos t) 2) (* (pow (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) 2) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* eh (* (sin t) (* (pow (sqrt -1) 2) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))))))) (pow (sqrt -1) 3)))) (* 1/2 (* (sqrt (/ (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (/ (- (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* 1/4 (/ (* (pow (cos t) 2) (* (pow (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) 2) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* eh (* (sin t) (* (pow (sqrt -1) 2) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))) (sqrt -1)))))))) (* (sqrt (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (sqrt -1))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* ew (+ (* -1 (* eh (* ew (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2))))))) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* ew (+ (* ew (+ (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))))))) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (/ (tan t) ew) #s(hole binary64 (/ (sin t) (* ew (cos t))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (+ (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2))))))) (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* (pow ew 2) (+ (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (* (pow ew 2) (+ (* -1 (* eh (* (sin t) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))))) (* (pow ew 2) (+ (* -1 (* eh (* (sin t) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (+ (* -1/2 (/ (* (cos t) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (+ (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 3) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/720 (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/720 (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3)))))))) (+ (* -1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (+ (* -1/2 (/ (* (cos t) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (+ (* 1/720 (/ (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3)))))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (+ (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))) (/ (* (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* (pow ew 2) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (/ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (/ 1 (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* (pow ew 2) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (+ (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (pow ew 2) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (/ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (/ 1 (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (- (+ (* (pow ew 2) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (+ (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (pow ew 2) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* (pow ew 2) (- (+ (* -1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (+ (* -1/2 (/ (* (cos t) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (+ (* 1/720 (/ (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (+ (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 3) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/720 (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3)))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/720 (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3)))))))) (+ (* -1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (+ (* -1/2 (/ (* (cos t) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (+ (* 1/720 (/ (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* 1/48 (/ (* (cos t) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* 1/48 (/ (pow (cos t) 3) (* (pow eh 3) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3)))))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (+ (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))) (+ (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))) (/ (* (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))) (/ (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))) (+ (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))))) (+ (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (* 1/8 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)) (/ (* (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (- (+ (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (* (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))))))) (/ (* (- (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) (- (* 1/2 (/ (* (cos t) (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (cos t) (* eh (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (pow (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))) 2)))) (/ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))))))) (/ 1 (* (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (+ (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew)))) (/ 1 (exp (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (* -1 (log ew))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (+ (* -1 (log ew)) (* 1/2 (/ (* (pow ew 2) (cos t)) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (+ (* -1 (log ew)) (* (pow ew 2) (+ (* 1/24 (* (pow ew 2) (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (* 1/2 (/ (cos t) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (+ (log (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (+ (* -1 (log ew)) (* (pow ew 2) (+ (* 1/2 (/ (cos t) (* eh (* (sin t) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))) (* (pow ew 2) (+ (* 1/720 (* (pow ew 2) (+ (* 30 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 3))))) (+ (* 45 (/ (pow (cos t) 4) (* (pow eh 4) (* (pow (sin t) 4) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* 45 (/ (pow (cos t) 5) (* (pow eh 5) (* (pow (sin t) 5) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))))) (* 1/24 (+ (* -3 (/ (pow (cos t) 2) (* (pow eh 2) (* (pow (sin t) 2) (pow (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) 2))))) (* -3 (/ (pow (cos t) 3) (* (pow eh 3) (* (pow (sin t) 3) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (- (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (- (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) (pow ew 2)))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 2)))) (pow ew 2)))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (+ (/ (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1/3 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))) (+ (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))))) (cos t)) (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))))) (cos t)))))))))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* 1/2 (/ (* eh (* (sin t) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t)))))) (pow ew 3)) (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 2))))) (pow ew 2)))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) ew))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 2)))) ew))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (+ (/ (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1/3 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))) (+ (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))))) (cos t)) (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))))) (cos t)))))))))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* 1/2 (/ (* eh (* (sin t) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t)))))) (pow ew 3)) (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 2))))) ew))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (* 1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew))) ew))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (* 1/2 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (pow ew 2))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* (pow ew 2) (pow (cos t) 3))))) ew))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (+ (* 1/2 (/ (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1/3 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))) (+ (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))))) (cos t)) (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))))) (cos t))))))))) (pow ew 3))) (* 1/2 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (pow ew 2)))))) (+ (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* (pow ew 2) (pow (cos t) 3)))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* (pow ew 3) (pow (cos t) 2)))) (* 1/2 (/ (* eh (* (sin t) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (* (pow ew 3) (cos t))))))) ew))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (* 1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew))) ew))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/6 (/ (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (pow ew 2))) (* 1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew)))) ew))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/24 (/ (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4)))) (pow ew 3))) (+ (* 1/6 (/ (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (pow ew 2))) (* 1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew))))) ew))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (- (+ (* -1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (- (+ (* -1 (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 4))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)) (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* ew (+ (sqrt (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) ew)) (* 1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ 1 (* (pow ew 5) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* ew (+ (sqrt (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) ew)) (+ (* -1/4 (* (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (sqrt (/ 1 (* (pow ew 7) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* 1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ 1 (* (pow ew 5) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* ew (+ (sqrt (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) ew)) (+ (* -1/2 (* (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (sqrt (/ 1 (* (pow ew 9) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (+ (* -1/4 (* (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (sqrt (/ 1 (* (pow ew 7) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* 1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ 1 (* (pow ew 5) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (/ (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* (pow eh 2) (pow (sin t) 2)) (cos t))) ew))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 2))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* (pow eh 2) (pow (sin t) 2)) (cos t)))) ew))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1/3 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))) (+ (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))))) (cos t)) (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))))) (cos t)))))))))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* 1/2 (/ (* eh (* (sin t) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t))))))) (pow ew 3))) (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 2))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* (pow eh 2) (pow (sin t) 2)) (cos t))))) ew))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (* 1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew))) ew))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (* 1/2 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (pow ew 2))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* (pow ew 2) (pow (cos t) 3))))) ew))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (+ (* 1/2 (/ (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1/3 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))) (+ (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))))) (cos t)) (/ (* eh (* (sin t) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/6 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))))) (cos t))))))))) (pow ew 3))) (* 1/2 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (pow ew 2)))))) (+ (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* (pow ew 2) (pow (cos t) 3)))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* (pow ew 3) (pow (cos t) 2)))) (* 1/2 (/ (* eh (* (sin t) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (* (pow ew 3) (cos t))))))) ew))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (* 1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew))) ew))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/6 (/ (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (pow ew 2))) (* 1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew)))) ew))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* 1/24 (/ (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4)))) (pow ew 3))) (+ (* 1/6 (/ (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (pow ew 2))) (* 1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew))))) ew))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* -1 (/ (- (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (* -1 (/ (+ (* -1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew)) ew))) (pow ew 2)))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (+ (* -1 (/ (* eh (pow (sin t) 2)) (cos t))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (/ (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/3 (/ (* eh (* (sin t) (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))))))))))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (cos t))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2)))))) ew)) ew)) (* -1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) ew))) (pow ew 2)))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* eh (pow (sin t) 2)) (cos t))) ew)))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew)) (* 1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) ew)) (/ (* eh (pow (sin t) 2)) (cos t))) ew)))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/3 (/ (* eh (* (sin t) (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))))))))))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (cos t))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2)))))) ew)) (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* 1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) ew)) (/ (* eh (pow (sin t) 2)) (cos t))) ew)))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (* 1/2 (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/3 (/ (* eh (* (sin t) (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))))))))))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (cos t))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))))) ew)) (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t)))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (* 1/2 (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/24 (/ (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4)))) ew)) (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (- (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))) (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (- (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew) (* 1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (pow ew 3)))) (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))) (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* (sqrt (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (pow (sqrt -1) 2))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* ew (+ (* 1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ 1 (* (pow ew 5) (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* (sqrt (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) ew)) (pow (sqrt -1) 2))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ ew (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/4 (* (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (sqrt (/ 1 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) (pow ew 3))) (* (sqrt (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) ew)) (pow (sqrt -1) 2))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (sqrt (/ ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/2 (* (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (sqrt (/ 1 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) ew)) (* -1/2 (* (* (pow eh 2) (pow (sin t) 2)) (sqrt (/ ew (* (pow (cos t) 3) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (pow ew 3))) (* (sqrt (/ (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) ew)) (pow (sqrt -1) 2))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (cos t))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew))) ew)))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (cos t))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) ew))) ew)))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (cos t))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/3 (/ (* eh (* (sin t) (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))))))))))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (cos t))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))))))) ew)) ew)) (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) ew))) ew)))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (* 1/2 (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/6 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (cos t))) (+ (* 1/12 (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) (+ (* 1/12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (+ (* 1/4 (pow (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) 2)) (+ (* 1/3 (/ (* eh (* (sin t) (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow (cos t) 2))))))))))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (cos t))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))))) ew)) (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t)))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (* 1/2 (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/24 (/ (+ (* -12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (* 12 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4)))) ew)) (* 1/6 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* eh (sin t)) (cos t))) ew)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* -1/2 (* ew (* t (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* t (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/6 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* -1 (* ew (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow t 2) (- (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow t 2) (- (* t (- (* -1 (* ew (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* ew (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* 1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* t (+ (* 1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* ew (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) ew))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* t (+ (* 1/2 (/ (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) ew)) (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* -1 (/ (* eh (pow t 2)) (pow ew 2))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ eh (pow ew 2))) (* 1/2 (/ (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) ew)))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ eh (pow ew 2))) (* t (+ (* 1/2 (/ (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (+ (* 1/6 (/ eh (pow ew 2))) (* 1/2 (/ (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))) ew))) (* -1/2 (/ (pow eh 3) (pow ew 4))))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ eh (pow ew 2))) (* t (+ (* 1/2 (/ (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (+ (* 1/6 (/ eh (pow ew 2))) (+ (* 1/2 (/ (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))) ew)) (* t (- (+ (* -1/12 (/ (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))) ew)) (* 1/2 (/ (+ (* -1 (* (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (+ (* -1/3 (/ (* eh (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) ew)) (+ (* 1/12 (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4)))))))) (+ (* 1/12 (/ (pow eh 4) (pow ew 4))) (+ (* 1/4 (pow (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (pow ew 2))) (+ (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))))) ew) (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (+ (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) ew)))))))) ew))) (+ (* 1/4 (/ (* (pow eh 2) (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (pow ew 3))) (* 1/2 (/ (* eh (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))) (pow ew 2)))))))) (* -1/2 (/ (pow eh 3) (pow ew 4))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* -1 (/ (* eh (pow t 2)) ew)))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ eh ew)) (* 1/2 (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* t (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (* (pow t 2) (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* t (- (+ (* 1/6 (/ eh ew)) (+ (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) (* t (- (+ (* -1/12 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (+ (* -1/3 (/ (* eh (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) ew)) (+ (* 1/12 (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4)))))))) (+ (* 1/12 (/ (pow eh 4) (pow ew 4))) (+ (* 1/4 (pow (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (pow ew 2))) (+ (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))))) ew) (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (+ (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) ew)))))))))) (+ (* 1/4 (/ (* (pow eh 2) (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (* 1/2 (/ (* eh (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* 1/2 (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* t (- (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* t (- (+ (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) (* t (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (+ (* -1/3 (/ (* eh (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) ew)) (+ (* 1/12 (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4)))))))) (+ (* 1/12 (/ (pow eh 4) (pow ew 4))) (+ (* 1/4 (pow (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (pow ew 2))) (+ (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))))) ew) (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (+ (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) ew))))))))) (+ (* 1/4 (/ (* (pow eh 2) (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (* 1/2 (/ (* eh (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))) ew)))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* 1/2 (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/6 (* t (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))) (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* t (+ (* 1/24 (* t (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4))))))))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))))))))))) |
#s(approx (neg (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (neg (* (/ eh ew) (tan t))) #s(hole binary64 (* t (- (* -1/3 (/ (* eh (pow t 2)) ew)) (/ eh ew))))) |
#s(approx (neg (* (/ eh ew) (tan t))) #s(hole binary64 (* t (- (* (pow t 2) (- (* -2/15 (/ (* eh (pow t 2)) ew)) (* 1/3 (/ eh ew)))) (/ eh ew))))) |
#s(approx (neg (* (/ eh ew) (tan t))) #s(hole binary64 (* t (- (* (pow t 2) (- (* (pow t 2) (- (* -17/315 (/ (* eh (pow t 2)) ew)) (* 2/15 (/ eh ew)))) (* 1/3 (/ eh ew)))) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (/ (* eh t) ew))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* 1/3 (/ (* eh (pow t 2)) ew)) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 2/15 (/ (* eh (pow t 2)) ew)) (* 1/3 (/ eh ew)))) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 1/3 (/ eh ew)) (* (pow t 2) (+ (* 17/315 (/ (* eh (pow t 2)) ew)) (* 2/15 (/ eh ew)))))) (/ eh ew))))) |
#s(approx (tan t) #s(hole binary64 t)) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* 1/3 (pow t 2)))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* 2/15 (pow t 2)))))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* (pow t 2) (+ 2/15 (* 17/315 (pow t 2)))))))))) |
#s(approx t #s(hole binary64 t)) |
#s(approx (sin t) #s(hole binary64 t)) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* -1/6 (pow t 2)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* 1/120 (pow t 2)) 1/6)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/120 (* -1/5040 (pow t 2)))) 1/6)))))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) #s(hole binary64 (* -1 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) #s(hole binary64 (- (* 1/2 (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) #s(hole binary64 (- (* (pow t 2) (- (* -1/24 (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) #s(hole binary64 (- (* (pow t 2) (- (* (pow t 2) (- (* 1/720 (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) #s(hole binary64 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) #s(hole binary64 (+ (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))) (* -1/2 (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) #s(hole binary64 (+ (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/24 (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) #s(hole binary64 (+ (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/720 (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (cos t) #s(hole binary64 1)) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* -1/2 (pow t 2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* 1/24 (pow t 2)) 1/2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/24 (* -1/720 (pow t 2)))) 1/2))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* eh (* (pow t 2) (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew))))) (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* eh (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* eh (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew)))) (* t (+ (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* eh (* t (- (+ (* -1/2 (/ (pow eh 3) (pow ew 3))) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (+ (* -1/2 (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (+ (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* t (- (* t (- (+ (* -1/2 (/ (pow eh 3) (pow ew 3))) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))))) (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* -1/2 (/ (* ew (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* 1/24 (/ (* ew (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* (pow t 2) (+ (* -1/720 (/ (* ew (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (* -1/2 (* ew (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (* ew (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* -1/720 (* ew (* (pow t 2) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/24 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))))) |
#s(approx (* (cos t) ew) #s(hole binary64 ew)) |
#s(approx (* (cos t) ew) #s(hole binary64 (+ ew (* -1/2 (* ew (pow t 2)))))) |
#s(approx (* (cos t) ew) #s(hole binary64 (+ ew (* (pow t 2) (+ (* -1/2 ew) (* 1/24 (* ew (pow t 2)))))))) |
#s(approx (* (cos t) ew) #s(hole binary64 (+ ew (* (pow t 2) (+ (* -1/2 ew) (* (pow t 2) (+ (* -1/720 (* ew (pow t 2))) (* 1/24 ew)))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))) (* t (- (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))) (* t (- (+ (* -1/2 (* ew (* t (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))))) (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI)))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))) (* t (- (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI))))) (* t (+ (* -1/2 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI)))))) (* t (- (* -1/6 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI)))))) (* -1/6 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (+ (* ew (* t (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI)))))) (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI)))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))) (* t (+ (* -1/2 (* ew (* t (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))))) (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI)))))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI))))) (* t (+ (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI))))) (* t (+ (* -1/2 (* ew (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (sin (* 1/2 (PI)))))) (* -1/6 (* ew (* t (* (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) (cos (* 1/2 (PI)))))))))))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) #s(hole binary64 (* ew (sin (* 1/2 (PI)))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* ew (sin (* 1/2 (PI)))) (* ew (* t (cos (* 1/2 (PI)))))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* ew (sin (* 1/2 (PI)))) (* t (+ (* -1/2 (* ew (* t (sin (* 1/2 (PI)))))) (* ew (cos (* 1/2 (PI))))))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* ew (sin (* 1/2 (PI)))) (* t (+ (* ew (cos (* 1/2 (PI)))) (* t (+ (* -1/2 (* ew (sin (* 1/2 (PI))))) (* -1/6 (* ew (* t (cos (* 1/2 (PI))))))))))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* t (cos (* 1/2 (PI))))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* t (+ (cos (* 1/2 (PI))) (* -1/2 (* t (sin (* 1/2 (PI)))))))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* t (+ (cos (* 1/2 (PI))) (* t (+ (* -1/2 (sin (* 1/2 (PI)))) (* -1/6 (* t (cos (* 1/2 (PI)))))))))))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI))))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* -1/2 (* (pow t 2) (sin (* 1/2 (PI)))))))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow t 2) (+ (* -1/2 (sin (* 1/2 (PI)))) (* 1/24 (* (pow t 2) (sin (* 1/2 (PI)))))))))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* (pow t 2) (+ (* -1/2 (sin (* 1/2 (PI)))) (* (pow t 2) (+ (* -1/720 (* (pow t 2) (sin (* 1/2 (PI))))) (* 1/24 (sin (* 1/2 (PI))))))))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* -1/3 (/ (* eh (pow t 2)) ew)))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* (pow t 2) (+ (* -1/3 (/ eh ew)) (* -2/15 (/ (* eh (pow t 2)) ew)))))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* (pow t 2) (+ (* -1/3 (/ eh ew)) (* (pow t 2) (+ (* -2/15 (/ eh ew)) (* -17/315 (/ (* eh (pow t 2)) ew)))))))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* -1 (* eh t)))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* t (+ (* -1 eh) (* -1/3 (* eh (pow t 2))))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* t (+ (* -1 eh) (* (pow t 2) (+ (* -1/3 eh) (* -2/15 (* eh (pow t 2))))))))) |
#s(approx (* (neg eh) (tan t)) #s(hole binary64 (* t (+ (* -1 eh) (* (pow t 2) (+ (* -1/3 eh) (* (pow t 2) (+ (* -2/15 eh) (* -17/315 (* eh (pow t 2))))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* t (+ (* -1/6 (* eh (* (pow t 2) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* t (+ (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/6 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/120 (* eh (* (pow t 2) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) #s(hole binary64 (* t (+ (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/6 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* -1/5040 (* eh (* (pow t 2) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/120 (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* eh t))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* -1/6 (* eh (pow t 2))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* 1/120 (* eh (pow t 2))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* (pow t 2) (+ (* -1/5040 (* eh (pow t 2))) (* 1/120 eh))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* t (+ (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* t (+ (* -1 (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3)))))) (* 1/24 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (/ (pow eh 2) ew))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (sqrt (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (sqrt (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/2 (* (sqrt (/ 1 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew)))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (sqrt (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* -1/4 (* (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (sqrt (/ 1 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/2 (* (sqrt (/ 1 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (+ (sqrt (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* 1/2 (* (sqrt (/ 1 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew)))) (* t (+ (* -1/4 (* (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (sqrt (/ 1 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/2 (* (sqrt (/ 1 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* t (- (+ (* -1 (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3)))))) (* 1/24 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/4 (/ (pow (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew)) 2) (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew)))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (pow eh 2) ew))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* t (+ (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* t (+ (* -1 (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3)))))) (* 1/24 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) (/ (pow eh 2) ew))))))) |
#s(approx (* (neg eh) (/ (tan t) ew)) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (* (neg eh) (/ (tan t) ew)) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* -1/3 (/ (* eh (pow t 2)) ew)))))) |
#s(approx (* (neg eh) (/ (tan t) ew)) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* (pow t 2) (+ (* -1/3 (/ eh ew)) (* -2/15 (/ (* eh (pow t 2)) ew)))))))) |
#s(approx (* (neg eh) (/ (tan t) ew)) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* (pow t 2) (+ (* -1/3 (/ eh ew)) (* (pow t 2) (+ (* -2/15 (/ eh ew)) (* -17/315 (/ (* eh (pow t 2)) ew)))))))))) |
#s(approx (/ (tan t) ew) #s(hole binary64 (/ t ew))) |
#s(approx (/ (tan t) ew) #s(hole binary64 (* t (+ (* 1/3 (/ (pow t 2) ew)) (/ 1 ew))))) |
#s(approx (/ (tan t) ew) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 2/15 (/ (pow t 2) ew)) (* 1/3 (/ 1 ew)))) (/ 1 ew))))) |
#s(approx (/ (tan t) ew) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* (pow t 2) (+ (* 17/315 (/ (pow t 2) ew)) (* 2/15 (/ 1 ew)))) (* 1/3 (/ 1 ew)))) (/ 1 ew))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (/ (* (pow eh 2) (pow t 2)) ew))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* (pow t 2) (+ (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (/ (pow eh 2) ew))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* (pow t 2) (+ (* t (+ (* -1 (* eh (* t (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))) (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (/ (pow eh 2) ew))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* (pow t 2) (+ (* t (+ (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* t (+ (* -1 (* eh (* t (- (+ (* -1/12 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (+ (* -1/3 (/ (* eh (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) ew)) (+ (* 1/12 (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4)))))))) (+ (* 1/12 (/ (pow eh 4) (pow ew 4))) (+ (* 1/4 (pow (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (pow ew 2))) (+ (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))))) ew) (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (+ (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) ew)))))))))) (+ (* 1/4 (/ (* (pow eh 2) (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (* 1/2 (/ (* eh (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))) ew))))))) (* -1 (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3)))))))))) (/ (pow eh 2) ew))))) |
#s(approx (neg (* (sin t) eh)) #s(hole binary64 (* -1 (* eh t)))) |
#s(approx (neg (* (sin t) eh)) #s(hole binary64 (* t (- (* 1/6 (* eh (pow t 2))) eh)))) |
#s(approx (neg (* (sin t) eh)) #s(hole binary64 (* t (- (* (pow t 2) (- (* -1/120 (* eh (pow t 2))) (* -1/6 eh))) eh)))) |
#s(approx (neg (* (sin t) eh)) #s(hole binary64 (* t (- (* (pow t 2) (- (* (pow t 2) (- (* 1/5040 (* eh (pow t 2))) (* 1/120 eh))) (* -1/6 eh))) eh)))) |
#s(approx (* (sin t) eh) #s(hole binary64 (* eh t))) |
#s(approx (* (sin t) eh) #s(hole binary64 (* t (+ eh (* -1/6 (* eh (pow t 2))))))) |
#s(approx (* (sin t) eh) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* 1/120 (* eh (pow t 2))))))))) |
#s(approx (* (sin t) eh) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* (pow t 2) (+ (* -1/5040 (* eh (pow t 2))) (* 1/120 eh))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* 1/2 (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* t (- (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (* t (- (+ (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) (* t (- (* 1/2 (+ (* -1 (* (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (+ (* -1/3 (/ (* eh (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) ew)) (+ (* 1/12 (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4)))))))) (+ (* 1/12 (/ (pow eh 4) (pow ew 4))) (+ (* 1/4 (pow (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))) 2)) (+ (* 1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (pow ew 2))) (+ (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))))) ew) (/ (* eh (+ (* -1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/6 (/ (pow eh 3) (pow ew 3))) (+ (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) ew))))))))) (+ (* 1/4 (/ (* (pow eh 2) (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (* 1/2 (/ (* eh (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))) ew)))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* -1 (/ (* eh t) ew)))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* 1/2 (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/6 (* t (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3))))))) (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (* t (+ (* -1 (/ eh ew)) (* t (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* t (+ (* 1/24 (* t (+ (* -8 (/ (pow eh 2) (pow ew 2))) (+ (* -6 (/ (pow eh 4) (pow ew 4))) (+ (* -3 (/ (pow eh 4) (pow ew 4))) (+ (* 12 (- (* 2/3 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))) (* 12 (/ (pow eh 4) (pow ew 4))))))))) (* 1/6 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) #s(hole binary64 (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) #s(hole binary64 (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) #s(hole binary64 (log (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (tan t) #s(hole binary64 (/ (sin t) (cos t)))) |
#s(approx (sin t) #s(hole binary64 (sin t))) |
#s(approx (cos t) #s(hole binary64 (cos t))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos t) (sin (* 1/2 (PI)))) (* (cos (* 1/2 (PI))) (sin t))))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) #s(hole binary64 (* (cos t) (sin (* 1/2 (PI)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) #s(hole binary64 (sqrt (+ (* -1 (/ (* eh (* (sin t) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) #s(hole binary64 (/ (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ 1 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) #s(hole binary64 (log (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) |
| Outputs |
|---|
(sqrt.f64 (*.f64 #s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew))) #s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew))))) |
(fabs.f64 (neg.f64 #s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew))))) |
(fabs.f64 #s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew))) |
(neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)) |
(*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew) |
(/.f64 (+.f64 (pow.f64 (*.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t))) #s(literal 3 binary64))) (fma.f64 (*.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew)) (*.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew)) (-.f64 (*.f64 (neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t))) (neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) (*.f64 (*.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew)) (neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t))))))) |
(fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) |
(+.f64 (*.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew)) (neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) |
eh |
(/.f64 (neg.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) (neg.f64 ew)) |
(/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) |
(*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) |
(tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(/.f64 (-.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
(/.f64 (expm1.f64 (*.f64 #s(literal 2 binary64) (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (+.f64 (exp.f64 (*.f64 #s(literal 2 binary64) (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) #s(literal 1 binary64))) |
(/.f64 (-.f64 (exp.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (exp.f64 (neg.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (+.f64 (exp.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (exp.f64 (neg.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
(/.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
(asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(log.f64 (+.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) (sqrt.f64 (fma.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal 1 binary64))))) |
(neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(*.f64 (/.f64 eh ew) (tan.f64 t)) |
(/.f64 (neg.f64 (*.f64 eh (sin.f64 t))) (neg.f64 (*.f64 ew (cos.f64 t)))) |
(/.f64 (*.f64 eh (sin.f64 t)) (*.f64 ew (cos.f64 t))) |
(/.f64 (neg.f64 eh) (neg.f64 ew)) |
(/.f64 eh ew) |
ew |
(/.f64 (neg.f64 (sin.f64 t)) (neg.f64 (cos.f64 t))) |
(/.f64 (sin.f64 t) (cos.f64 t)) |
(tan.f64 (+.f64 t (PI.f64))) |
(tan.f64 t) |
t |
(sin.f64 t) |
(neg.f64 (*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t))) |
(*.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) t)) (cos.f64 (-.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) t))) #s(literal 2 binary64)) |
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
(sin.f64 (+.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 t) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 t) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 t) #s(literal 0 binary64)) (*.f64 (sin.f64 t) #s(literal 0 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 t) #s(literal 1 binary64)) (*.f64 (cos.f64 t) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 t) #s(literal 0 binary64)) (*.f64 (cos.f64 t) #s(literal 1 binary64)))))) |
(fma.f64 (sin.f64 t) #s(literal 0 binary64) (*.f64 (cos.f64 t) #s(literal 1 binary64))) |
(sin.f64 (+.f64 t (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 t)) |
(cos.f64 t) |
(+.f64 (*.f64 (sin.f64 t) #s(literal 0 binary64)) (*.f64 (cos.f64 t) #s(literal 1 binary64))) |
(sqrt.f64 (*.f64 #s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh)) #s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh)))) |
(fabs.f64 (neg.f64 #s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh)))) |
(fabs.f64 #s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh)) |
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh) |
(-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) |
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (neg.f64 eh)) |
(/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) |
(*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(*.f64 (cos.f64 t) ew) |
(sqrt.f64 (*.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))))) |
(fabs.f64 (-.f64 (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
(fabs.f64 (neg.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))))) |
(fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
(-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
(*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) |
(*.f64 ew (cos.f64 t)) |
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 t) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 t) #s(literal 1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 (sin.f64 t) #s(literal 0 binary64)) (*.f64 (sin.f64 t) #s(literal 0 binary64)) (-.f64 (*.f64 (*.f64 (cos.f64 t) #s(literal 1 binary64)) (*.f64 (cos.f64 t) #s(literal 1 binary64))) (*.f64 (*.f64 (sin.f64 t) #s(literal 0 binary64)) (*.f64 (cos.f64 t) #s(literal 1 binary64)))))) |
(fma.f64 (sin.f64 t) #s(literal 0 binary64) (*.f64 (cos.f64 t) #s(literal 1 binary64))) |
(sin.f64 (+.f64 t (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 t)) |
(cos.f64 t) |
(+.f64 (*.f64 (sin.f64 t) #s(literal 0 binary64)) (*.f64 (cos.f64 t) #s(literal 1 binary64))) |
#s(literal 0 binary64) |
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64)) |
(/.f64 (PI.f64) #s(literal 2 binary64)) |
(PI.f64) |
#s(literal 2 binary64) |
(*.f64 (cos.f64 t) #s(literal 1 binary64)) |
#s(literal 1 binary64) |
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew) (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
(sin.f64 (+.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) |
(cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))) |
(atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)) |
(/.f64 (neg.f64 (*.f64 (neg.f64 eh) (tan.f64 t))) (neg.f64 ew)) |
(/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew) |
(*.f64 (neg.f64 eh) (tan.f64 t)) |
(neg.f64 eh) |
(*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) |
(*.f64 eh (sin.f64 t)) |
(/.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew) (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
(sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))) |
(*.f64 (neg.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))))) |
(*.f64 (fabs.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) (fabs.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))))) |
(*.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
(pow.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) (*.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))))) |
(fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(sqrt.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
(+.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(pow.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) #s(literal 1/2 binary64)) |
(sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) |
(*.f64 (neg.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) (neg.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))))) |
(*.f64 (fabs.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) (fabs.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))))) |
(*.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
(pow.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (-.f64 (*.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) (*.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))))) |
(fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(sqrt.f64 (*.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
(+.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(sin.f64 (+.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) |
(cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) |
(atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))) |
(*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) |
(/.f64 (neg.f64 (tan.f64 t)) (neg.f64 ew)) |
(/.f64 (tan.f64 t) ew) |
(*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) |
(neg.f64 (*.f64 (sin.f64 t) eh)) |
(*.f64 (sin.f64 t) eh) |
(tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) |
(/.f64 (-.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) (+.f64 #s(literal 1 binary64) (exp.f64 (*.f64 #s(literal -2 binary64) (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) |
(/.f64 (expm1.f64 (*.f64 #s(literal 2 binary64) (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) (+.f64 (exp.f64 (*.f64 #s(literal 2 binary64) (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))) #s(literal 1 binary64))) |
(/.f64 (-.f64 (exp.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (exp.f64 (neg.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) (+.f64 (exp.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (exp.f64 (neg.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) |
(/.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))) |
(asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))) |
(log.f64 (fma.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew) (sqrt.f64 (fma.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)) #s(literal 1 binary64))))) |
#s(approx (fabs (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (fabs.f64 (-.f64 (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) ew)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) ew) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))) ew))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx eh eh) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (*.f64 (*.f64 ew ew) (cos.f64 t))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) ew))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) ew) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))) ew)))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) ew) (*.f64 eh (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (cos.f64 t))) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t)))))))) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))) (cos.f64 t))))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))) ew))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (*.f64 ew (cos.f64 t))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 eh (fma.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (cos.f64 t))) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t)))))))) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))) (cos.f64 t))))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t)))))) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (cos.f64 t))) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t)))))))) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))) (cos.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/6 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 eh (fma.f64 #s(literal 1/24 binary64) (*.f64 eh (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))))))))) |
#s(approx (neg (* (/ eh ew) (tan t))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (* (/ eh ew) (tan t)) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
#s(approx (/ eh ew) (/.f64 eh ew)) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (cos (atan (neg (* (/ eh ew) (tan t))))) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (atan (neg (* (/ eh ew) (tan t)))) (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 eh eh) (fma.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))) eh)) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) eh)) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 eh eh) (-.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) eh)) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (fabs (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (fabs.f64 (-.f64 (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 (cos.f64 t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 t)))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 (cos.f64 t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 t)))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 (cos.f64 t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 t))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 (cos.f64 t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 t)))))) |
#s(approx (cos (atan (/ (* (neg eh) (tan t)) ew))) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (atan (/ (* (neg eh) (tan t)) ew)) (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (* (neg eh) (tan t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) |
#s(approx (neg eh) (*.f64 #s(literal -1 binary64) eh)) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* eh (sin t)) (*.f64 eh (sin.f64 t))) |
#s(approx (sin (atan (/ (* (neg eh) (tan t)) ew))) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 eh eh) (fma.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (fma.f64 (sqrt.f64 ew) (sqrt.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 ew #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (fma.f64 (sqrt.f64 ew) (sqrt.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 ew #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (fma.f64 (sqrt.f64 ew) (sqrt.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 ew #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (*.f64 eh (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 ew #s(literal 3 binary64)) (*.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 eh eh) (fma.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) |
#s(approx (cos (atan (* (neg eh) (/ (tan t) ew)))) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (atan (* (neg eh) (/ (tan t) ew))) (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (* (neg eh) (/ (tan t) ew)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 (*.f64 eh eh) (fma.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 (*.f64 eh eh) (fma.f64 eh (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (cos.f64 t))) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t)))))))) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))) (cos.f64 t)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) |
#s(approx (neg (* (sin t) eh)) (*.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)))) |
#s(approx (* (sin t) eh) (*.f64 eh (sin.f64 t))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t)))))) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (cos.f64 t))) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t)))))))) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))) (cos.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/6 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 eh (fma.f64 #s(literal 1/24 binary64) (*.f64 eh (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 eh (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 eh (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 eh (-.f64 (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))) ew))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 eh (-.f64 (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))) ew) (*.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) ew)))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))) ew)))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))) ew) (*.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) ew))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))) ew) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) ew) (*.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/96 binary64) (*.f64 (/.f64 (*.f64 ew ew) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 6 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal -1/96 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal -1/96 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))))))) (fma.f64 #s(literal -1/96 binary64) (*.f64 (/.f64 (*.f64 ew ew) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (*.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) ew)))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64)))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/96 binary64) (*.f64 (/.f64 (*.f64 ew ew) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 6 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal -1/96 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal -1/96 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))))))) (fma.f64 #s(literal -1/96 binary64) (*.f64 (/.f64 (*.f64 ew ew) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (*.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 6 binary64))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (*.f64 eh eh)) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (+.f64 (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (*.f64 eh (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64)))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (*.f64 eh eh)) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (+.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))))))) (+.f64 (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (*.f64 eh (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (*.f64 eh eh)) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (fma.f64 #s(literal -1/96 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 6 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/96 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))))))))))))) (+.f64 (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (*.f64 eh (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal -1/96 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))))))) (fma.f64 #s(literal -1/96 binary64) (*.f64 (/.f64 (*.f64 ew ew) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (*.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))))) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (+.f64 (neg.f64 (log.f64 eh)) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (+.f64 (neg.f64 (log.f64 eh)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (pow.f64 eh #s(literal 4 binary64)))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (+.f64 (neg.f64 (log.f64 eh)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (pow.f64 eh #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (pow.f64 eh #s(literal 4 binary64))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 eh (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 (cos.f64 t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 t))))) eh) (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (pow.f64 eh #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt.f64 (*.f64 (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) #s(literal -1 binary64)))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (*.f64 (*.f64 (/.f64 (sin.f64 t) eh) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) #s(literal -1 binary64)))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 eh (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 5 binary64))) (/.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64)))) (sqrt.f64 #s(literal -1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (*.f64 (*.f64 (/.f64 (sin.f64 t) eh) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) #s(literal -1 binary64))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 eh (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 5 binary64))) (/.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64)))) (sqrt.f64 #s(literal -1 binary64)))) (fma.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 5 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) #s(literal 3 binary64))))) (/.f64 (*.f64 (*.f64 ew ew) (pow.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) #s(literal 2 binary64))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (*.f64 (*.f64 (/.f64 (sin.f64 t) eh) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) #s(literal -1 binary64)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (pow.f64 eh #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))))) (*.f64 eh eh)))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (pow.f64 eh #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))))) (*.f64 eh eh))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))))) (*.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (pow.f64 eh #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (pow.f64 eh #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))))) (*.f64 eh eh)))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))))) (+.f64 (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (*.f64 eh (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) #s(literal 2 binary64)))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (+.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))))))) (+.f64 (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (*.f64 eh (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64)))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (+.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))))))))))))) (+.f64 (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (*.f64 eh (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64)))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))))) (*.f64 (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (*.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))) #s(literal 2 binary64)))) (fma.f64 (exp.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (exp.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))))))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (pow.f64 eh #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 eh)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (pow.f64 eh #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (pow.f64 eh #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh)) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh)) eh)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh)))) eh))) eh)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 t) eh) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) ew)) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) ew))) eh)) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) ew)))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) ew) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) ew))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (*.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) ew) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) ew) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) ew)))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (*.f64 eh eh)))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (*.f64 eh eh))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (*.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 eh #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (*.f64 eh eh)))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (/.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (+.f64 (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (*.f64 eh (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal 2 binary64)))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (+.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))))) (+.f64 (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (*.f64 eh (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (+.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (fma.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))))))))))) (+.f64 (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (*.f64 eh (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (*.f64 (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) eh)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) eh)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (pow.f64 eh #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) eh)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 3 binary64))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (pow.f64 eh #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (pow.f64 eh #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh))) eh) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh)) eh)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh))) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))))) eh))) eh)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 (cos.f64 t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 t))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh))) eh) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal -1 binary64))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 ew (*.f64 (cos.f64 t) (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 (*.f64 (*.f64 (/.f64 (sin.f64 t) eh) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) #s(literal -1 binary64))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (*.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 5 binary64))) (/.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 ew (*.f64 (cos.f64 t) (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 (*.f64 (*.f64 (/.f64 (sin.f64 t) eh) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) #s(literal -1 binary64)))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 (*.f64 eh (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 3 binary64))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal 3 binary64)))) (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (pow.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))))))) (pow.f64 eh #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 ew (*.f64 (cos.f64 t) (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 (*.f64 (*.f64 (/.f64 (sin.f64 t) eh) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) #s(literal -1 binary64)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh))) eh) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (*.f64 eh eh)))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (*.f64 eh eh))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (fma.f64 #s(literal 45/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 6 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/96 binary64) (*.f64 (/.f64 (*.f64 ew ew) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (fma.f64 #s(literal 45/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (fma.f64 #s(literal 1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/96 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (fma.f64 #s(literal 45/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (fma.f64 #s(literal 1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/96 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (fma.f64 #s(literal 45/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))) (*.f64 #s(literal 1/96 binary64) (*.f64 (/.f64 (*.f64 ew ew) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (*.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 eh #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (*.f64 eh eh)))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (*.f64 eh eh)) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (+.f64 (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (*.f64 eh (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal 2 binary64)))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (*.f64 eh eh)) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))))) (+.f64 (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (*.f64 eh (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (fma.f64 #s(literal 45/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 6 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal 1/96 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (*.f64 eh eh)) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (fma.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (fma.f64 #s(literal 45/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (fma.f64 #s(literal 1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/96 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (*.f64 (/.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))))))))))) (+.f64 (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal -1 binary64)) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (*.f64 eh (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (fma.f64 #s(literal 45/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (fma.f64 #s(literal 1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/96 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (fma.f64 #s(literal 45/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (fma.f64 #s(literal 1/384 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))) (*.f64 #s(literal 1/96 binary64) (*.f64 (/.f64 (*.f64 ew ew) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (fma.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (*.f64 (/.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) eh)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) eh)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (pow.f64 eh #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) eh)) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 15/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (fma.f64 #s(literal 45/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (pow.f64 eh #s(literal 6 binary64))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/2 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (pow.f64 eh #s(literal 4 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (-.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 ew (-.f64 (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 ew (fma.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) ew)) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (/.f64 (fma.f64 ew (-.f64 (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) ew)) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (/.f64 (fma.f64 ew (-.f64 (*.f64 ew (fma.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) ew)) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (/.f64 (fma.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) ew)) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (/.f64 (fma.f64 (*.f64 ew ew) (fma.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))) (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) ew)) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (/.f64 (fma.f64 (*.f64 ew ew) (fma.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))) (*.f64 (*.f64 ew ew) (fma.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/96 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 6 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal -1/96 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal -1/96 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)))))))))) (fma.f64 #s(literal -1/96 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) ew)) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (fma.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (fma.f64 (*.f64 ew ew) (fma.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))) (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (fma.f64 (*.f64 ew ew) (fma.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))) (*.f64 (*.f64 ew ew) (fma.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/96 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 6 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal -1/96 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal -1/96 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)))))))))) (fma.f64 #s(literal -1/96 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (-.f64 (fma.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (pow.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) #s(literal -1 binary64)))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (-.f64 (fma.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (pow.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) #s(literal -1 binary64)))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (-.f64 (fma.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (fma.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal -1/96 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 6 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal -1/96 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal -1/96 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)))))))))) (fma.f64 #s(literal -1/96 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/384 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (pow.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) #s(literal -1 binary64)))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (+.f64 (log.f64 ew) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (+.f64 (log.f64 ew) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (+.f64 (log.f64 ew) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -720 binary64) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))) (fma.f64 #s(literal -15/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 45/2 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))))))))))) |
#s(approx ew ew) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 ew (fma.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (*.f64 ew (fma.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (* (cos t) ew) (*.f64 ew (cos.f64 t))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (-.f64 (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 (cos.f64 t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 t))))) (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (*.f64 ew (fma.f64 (cos.f64 t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 t))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) (*.f64 ew (fma.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt.f64 (*.f64 (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) #s(literal -1 binary64)))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) #s(literal -1 binary64))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (fma.f64 ew (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))) (/.f64 (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) eh) (/.f64 (*.f64 (pow.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) (*.f64 (sin.f64 t) (*.f64 #s(literal -1 binary64) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))))))))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 (*.f64 (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) #s(literal -1 binary64))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (fma.f64 ew (fma.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 ew (fma.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) #s(literal 3 binary64))))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) eh) (/.f64 (*.f64 (pow.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) (*.f64 (sin.f64 t) (*.f64 #s(literal -1 binary64) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))))))))))) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) eh) (/.f64 (*.f64 (pow.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) (*.f64 (sin.f64 t) (*.f64 #s(literal -1 binary64) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))))) (sqrt.f64 #s(literal -1 binary64)))))))) (sqrt.f64 (*.f64 (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) #s(literal -1 binary64))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) (*.f64 ew (fma.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (/ (tan t) ew) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))))))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64)))))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))))) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))))) (*.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))))))))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (-.f64 (fma.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64)))) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) #s(literal -1 binary64)))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (-.f64 (fma.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64)))) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) #s(literal -1 binary64)))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (-.f64 (fma.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (fma.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))))) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 3 binary64))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/720 binary64) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (fma.f64 #s(literal 1/48 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/48 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))) (/.f64 (fma.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))))) (*.f64 (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))) #s(literal 2 binary64)))) (/.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))))))) (pow.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (+.f64 (exp.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew))))))) #s(literal -1 binary64)))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (log.f64 ew)))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (fma.f64 #s(literal -1 binary64) (log.f64 ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 ew ew) eh) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (fma.f64 #s(literal -1 binary64) (log.f64 ew) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (+.f64 (log.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (fma.f64 #s(literal -1 binary64) (log.f64 ew) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal 30 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 3 binary64)))) (fma.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) #s(literal 2 binary64))))) (*.f64 #s(literal 45 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) #s(literal 2 binary64)))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (fma.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew))) (*.f64 ew ew))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) (*.f64 ew ew)))) (*.f64 ew ew))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))))) (cos.f64 t))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))) (cos.f64 t)))))) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) (*.f64 ew ew))))) (*.f64 ew ew))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew))) ew)) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) (*.f64 ew ew)))) ew)) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))))) (cos.f64 t))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))) (cos.f64 t)))))) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) (*.f64 ew ew))))) ew)) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew))) ew)) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t))))) (*.f64 ew ew))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) ew)) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))))) (cos.f64 t)))))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t))))) (*.f64 ew ew)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 eh eh) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 eh (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 t) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t))) (cos.f64 t))))))) ew)) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) ew))) ew)) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) ew)))) ew)) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) ew))))) ew)) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (fma.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) (pow.f64 ew #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64)))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew) (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 (cos.f64 t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 t))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 ew (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 ew (+.f64 (sqrt.f64 (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) ew)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 ew #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 ew (+.f64 (sqrt.f64 (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) ew)) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 ew #s(literal 7 binary64)) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 ew #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 ew (+.f64 (sqrt.f64 (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 ew #s(literal 9 binary64)) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 ew #s(literal 7 binary64)) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 ew #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 ew (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (cos.f64 t))) ew)) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (cos.f64 t)))) ew)) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))))) (cos.f64 t))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))) (cos.f64 t))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (cos.f64 t))))) ew)) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew))) ew)) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t))))) (*.f64 ew ew))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) ew)) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))))) (cos.f64 t)))))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t))))) (*.f64 ew ew)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 eh eh) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 eh (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 t) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t))) (cos.f64 t))))))) ew)) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) ew))) ew)) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) ew)))) ew)) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) ew))))) ew)) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64)))) (fma.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))) (pow.f64 ew #s(literal 3 binary64)))) (fma.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew)) (pow.f64 ew #s(literal 3 binary64))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) ew)) ew))) (*.f64 ew ew))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (cos.f64 t)) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))))) (cos.f64 t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew)) ew) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) ew))) (*.f64 ew ew))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t))) ew))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) ew) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t))) ew))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (cos.f64 t)) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))))) (cos.f64 t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) ew) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t))) ew))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (cos.f64 t)) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))))) (cos.f64 t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) ew) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew)) (pow.f64 ew #s(literal 3 binary64))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64))))) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (pow.f64 ew #s(literal 3 binary64))))) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 (cos.f64 t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 t)))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew)) (pow.f64 ew #s(literal 3 binary64))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) #s(literal -1 binary64)))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (pow.f64 ew #s(literal 5 binary64)) (*.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (*.f64 (sqrt.f64 (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) ew)) #s(literal -1 binary64)))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (sqrt.f64 (/.f64 ew (*.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) ew)) #s(literal -1 binary64)))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))) ew) (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (sqrt.f64 (/.f64 ew (*.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 (sqrt.f64 (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) ew)) #s(literal -1 binary64)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew)) (pow.f64 ew #s(literal 3 binary64))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (cos.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew))) ew))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew)) ew))) ew))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (cos.f64 t)) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))))) (cos.f64 t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) ew)) ew) (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))) ew))) ew))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (cos.f64 t)) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))))) (cos.f64 t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/24 binary64) (/.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))) ew) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 t (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 t (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 t (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 t (-.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 eh (*.f64 t (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))))) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 t (-.f64 (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/24 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))))) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 ew (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 t t) (fma.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 ew (*.f64 t (-.f64 (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/24 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew) (*.f64 t (-.f64 (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/24 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 t t)) (*.f64 ew ew)))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 eh (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 eh (*.f64 ew ew)) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (*.f64 t (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))) ew))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 ew #s(literal 4 binary64))))))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 eh (*.f64 ew ew)) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (*.f64 t (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))) ew) (*.f64 t (-.f64 (fma.f64 #s(literal -1/12 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))) ew) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal -6 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal 12 binary64) (-.f64 (*.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 ew ew)) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))))) (*.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) ew))))))) ew))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)) (*.f64 ew ew)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 ew #s(literal 4 binary64))))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))) (*.f64 t (-.f64 (fma.f64 #s(literal -1/12 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))) ew) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal -6 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal 12 binary64) (-.f64 (*.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 ew ew)) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))))) (*.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) ew))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)) ew))))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh t) ew))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))) ew) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal -6 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal 12 binary64) (-.f64 (*.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 ew ew)) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))))) (*.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) ew)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh t) ew))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal 1/6 binary64) (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 t (fma.f64 #s(literal 1/24 binary64) (*.f64 t (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal -6 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal 12 binary64) (-.f64 (*.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))))))))))) |
#s(approx (neg (* (/ eh ew) (tan t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh t) ew))) |
#s(approx (neg (* (/ eh ew) (tan t))) (*.f64 t (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew)) (/.f64 eh ew)))) |
#s(approx (neg (* (/ eh ew) (tan t))) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -2/15 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew)) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) (/.f64 eh ew)))) |
#s(approx (neg (* (/ eh ew) (tan t))) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -17/315 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew)) (*.f64 #s(literal 2/15 binary64) (/.f64 eh ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) (/.f64 eh ew)))) |
#s(approx (* (/ eh ew) (tan t)) (/.f64 (*.f64 eh t) ew)) |
#s(approx (* (/ eh ew) (tan t)) (*.f64 t (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew) (/.f64 eh ew)))) |
#s(approx (* (/ eh ew) (tan t)) (*.f64 t (fma.f64 (*.f64 t t) (fma.f64 #s(literal 2/15 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew))) (/.f64 eh ew)))) |
#s(approx (* (/ eh ew) (tan t)) (*.f64 t (fma.f64 (*.f64 t t) (fma.f64 #s(literal 1/3 binary64) (/.f64 eh ew) (*.f64 (*.f64 t t) (fma.f64 #s(literal 17/315 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew) (*.f64 #s(literal 2/15 binary64) (/.f64 eh ew))))) (/.f64 eh ew)))) |
#s(approx (tan t) t) |
#s(approx (tan t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 t t))))) |
#s(approx (tan t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 t t))))))) |
#s(approx (tan t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 t t))))))))) |
#s(approx t t) |
#s(approx (sin t) t) |
#s(approx (sin t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 t t))))) |
#s(approx (sin t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 t t)) #s(literal 1/6 binary64)))))) |
#s(approx (sin t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 t t)))) #s(literal 1/6 binary64)))))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) (*.f64 #s(literal -1 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 t t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 t t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) (+.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 t t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) (+.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 t t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) |
#s(approx (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)) (+.f64 (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 t t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) #s(literal 1 binary64)) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 t t)))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 t t)) #s(literal 1/2 binary64))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 t t)))) #s(literal 1/2 binary64))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 eh (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew)))) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (*.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew))))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (fma.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew))) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (fma.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) (*.f64 #s(literal -1 binary64) (/.f64 eh ew))) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (fma.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 t (-.f64 (*.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))))) (*.f64 #s(literal -1 binary64) (/.f64 eh ew))) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (*.f64 (*.f64 t t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 ew (*.f64 (*.f64 t t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh))) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) |
#s(approx (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 ew (*.f64 (*.f64 t t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))))) (/.f64 (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 (*.f64 t t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) (fma.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal 1/24 binary64) (*.f64 ew (*.f64 (*.f64 t t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))) |
#s(approx (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) (fma.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/720 binary64) (*.f64 ew (*.f64 (*.f64 t t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 ew (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))))) |
#s(approx (* (cos t) ew) ew) |
#s(approx (* (cos t) ew) (+.f64 ew (*.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 t t))))) |
#s(approx (* (cos t) ew) (+.f64 ew (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) ew (*.f64 #s(literal 1/24 binary64) (*.f64 ew (*.f64 t t))))))) |
#s(approx (* (cos t) ew) (+.f64 ew (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) ew (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/720 binary64) (*.f64 ew (*.f64 t t)) (*.f64 #s(literal 1/24 binary64) ew))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 t (-.f64 (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 t (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (- (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 t (-.f64 (fma.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 t (-.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 #s(literal -1/6 binary64) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (fma.f64 ew (*.f64 t (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (fma.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 t (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) |
#s(approx (* (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (fma.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 t (fma.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 #s(literal -1/6 binary64) (*.f64 ew (*.f64 t (*.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (*.f64 ew (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (fma.f64 ew (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 ew (*.f64 t (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (fma.f64 ew (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 t (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 ew (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))) |
#s(approx (* ew (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2))))) (fma.f64 ew (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 t (fma.f64 ew (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal -1/6 binary64) (*.f64 ew (*.f64 t (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 t (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 t (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 t (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 t (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/6 binary64) (*.f64 t (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 t t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 t t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) (+.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 t t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))) (*.f64 #s(literal 1/24 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh t) ew))) |
#s(approx (/ (* (neg eh) (tan t)) ew) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (*.f64 #s(literal -2/15 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew))))))) |
#s(approx (/ (* (neg eh) (tan t)) ew) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (*.f64 (*.f64 t t) (fma.f64 #s(literal -2/15 binary64) (/.f64 eh ew) (*.f64 #s(literal -17/315 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew))))))))) |
#s(approx (* (neg eh) (tan t)) (*.f64 #s(literal -1 binary64) (*.f64 eh t))) |
#s(approx (* (neg eh) (tan t)) (*.f64 t (fma.f64 #s(literal -1 binary64) eh (*.f64 #s(literal -1/3 binary64) (*.f64 eh (*.f64 t t)))))) |
#s(approx (* (neg eh) (tan t)) (*.f64 t (fma.f64 #s(literal -1 binary64) eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/3 binary64) eh (*.f64 #s(literal -2/15 binary64) (*.f64 eh (*.f64 t t)))))))) |
#s(approx (* (neg eh) (tan t)) (*.f64 t (fma.f64 #s(literal -1 binary64) eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/3 binary64) eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -2/15 binary64) eh (*.f64 #s(literal -17/315 binary64) (*.f64 eh (*.f64 t t)))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 eh (*.f64 t (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 t (fma.f64 #s(literal -1/6 binary64) (*.f64 eh (*.f64 (*.f64 t t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 t (fma.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/6 binary64) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal 1/120 binary64) (*.f64 eh (*.f64 (*.f64 t t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))))) |
#s(approx (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))) (*.f64 t (fma.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/6 binary64) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/5040 binary64) (*.f64 eh (*.f64 (*.f64 t t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 #s(literal 1/120 binary64) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))))) |
#s(approx (* eh (sin t)) (*.f64 eh t)) |
#s(approx (* eh (sin t)) (*.f64 t (+.f64 eh (*.f64 #s(literal -1/6 binary64) (*.f64 eh (*.f64 t t)))))) |
#s(approx (* eh (sin t)) (*.f64 t (+.f64 eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/6 binary64) eh (*.f64 #s(literal 1/120 binary64) (*.f64 eh (*.f64 t t)))))))) |
#s(approx (* eh (sin t)) (*.f64 t (+.f64 eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/6 binary64) eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/5040 binary64) (*.f64 eh (*.f64 t t)) (*.f64 #s(literal 1/120 binary64) eh)))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh eh) ew))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh eh) ew)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (*.f64 #s(literal 1/24 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (/.f64 (*.f64 eh eh) ew)))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (fma.f64 (sqrt.f64 ew) (sqrt.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh eh) ew))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (fma.f64 (sqrt.f64 ew) (sqrt.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh eh) ew)))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (fma.f64 (sqrt.f64 ew) (sqrt.f64 (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh eh) ew))) (*.f64 t (fma.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (*.f64 t (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (*.f64 #s(literal 1/24 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh eh) ew)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh eh) ew))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh eh) ew)))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (*.f64 #s(literal 1/24 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (/.f64 (*.f64 eh eh) ew)))))) |
#s(approx (* (neg eh) (/ (tan t) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh t) ew))) |
#s(approx (* (neg eh) (/ (tan t) ew)) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew))))) |
#s(approx (* (neg eh) (/ (tan t) ew)) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (*.f64 #s(literal -2/15 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew))))))) |
#s(approx (* (neg eh) (/ (tan t) ew)) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (*.f64 (*.f64 t t) (fma.f64 #s(literal -2/15 binary64) (/.f64 eh ew) (*.f64 #s(literal -17/315 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew))))))))) |
#s(approx (/ (tan t) ew) (/.f64 t ew)) |
#s(approx (/ (tan t) ew) (*.f64 t (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 t t) ew) (pow.f64 ew #s(literal -1 binary64))))) |
#s(approx (/ (tan t) ew) (*.f64 t (fma.f64 (*.f64 t t) (fma.f64 #s(literal 2/15 binary64) (/.f64 (*.f64 t t) ew) (*.f64 #s(literal 1/3 binary64) (pow.f64 ew #s(literal -1 binary64)))) (pow.f64 ew #s(literal -1 binary64))))) |
#s(approx (/ (tan t) ew) (*.f64 t (fma.f64 (*.f64 t t) (fma.f64 (*.f64 t t) (fma.f64 #s(literal 17/315 binary64) (/.f64 (*.f64 t t) ew) (*.f64 #s(literal 2/15 binary64) (pow.f64 ew #s(literal -1 binary64)))) (*.f64 #s(literal 1/3 binary64) (pow.f64 ew #s(literal -1 binary64)))) (pow.f64 ew #s(literal -1 binary64))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (/.f64 (pow.f64 (*.f64 eh t) #s(literal 2 binary64)) ew)) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (/.f64 (*.f64 eh eh) ew)))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 (*.f64 t t) (fma.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 t (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))))) (/.f64 (*.f64 eh eh) ew)))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 (*.f64 t t) (fma.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 t (-.f64 (fma.f64 #s(literal -1/12 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))) ew) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal -6 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal 12 binary64) (-.f64 (*.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 ew ew)) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))))) (*.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) ew))))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)) ew)))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))))))) (/.f64 (*.f64 eh eh) ew)))) |
#s(approx (neg (* (sin t) eh)) (*.f64 #s(literal -1 binary64) (*.f64 eh t))) |
#s(approx (neg (* (sin t) eh)) (*.f64 t (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 eh (*.f64 t t))) eh))) |
#s(approx (neg (* (sin t) eh)) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/120 binary64) (*.f64 eh (*.f64 t t))) (*.f64 #s(literal -1/6 binary64) eh))) eh))) |
#s(approx (neg (* (sin t) eh)) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/5040 binary64) (*.f64 eh (*.f64 t t))) (*.f64 #s(literal 1/120 binary64) eh))) (*.f64 #s(literal -1/6 binary64) eh))) eh))) |
#s(approx (* (sin t) eh) (*.f64 eh t)) |
#s(approx (* (sin t) eh) (*.f64 t (+.f64 eh (*.f64 #s(literal -1/6 binary64) (*.f64 eh (*.f64 t t)))))) |
#s(approx (* (sin t) eh) (*.f64 t (+.f64 eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/6 binary64) eh (*.f64 #s(literal 1/120 binary64) (*.f64 eh (*.f64 t t)))))))) |
#s(approx (* (sin t) eh) (*.f64 t (+.f64 eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/6 binary64) eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/5040 binary64) (*.f64 eh (*.f64 t t)) (*.f64 #s(literal 1/120 binary64) eh)))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh t) ew))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))) ew) (fma.f64 #s(literal 1/12 binary64) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal -6 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal 12 binary64) (-.f64 (*.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64)))))))) (fma.f64 #s(literal 1/12 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 ew ew)) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))))) (*.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) ew)))))))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh t) ew))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal 1/6 binary64) (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 t (fma.f64 #s(literal 1/24 binary64) (*.f64 t (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal -6 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal 12 binary64) (-.f64 (*.f64 #s(literal 2/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))) (*.f64 #s(literal 12 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))))))) (*.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 ew (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t)))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (tanh (asinh (neg (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t)))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (asinh (neg (* (/ eh ew) (tan t)))) (log.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (tan t) (tan.f64 t)) |
#s(approx (sin t) (sin.f64 t)) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (cos.f64 t)) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 eh (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (+ (* (sin t) (cos (/ (PI) 2))) (* (cos t) (sin (/ (PI) 2)))) (fma.f64 (cos.f64 t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 t)))) |
#s(approx (* (cos t) (sin (/ (PI) 2))) (*.f64 (cos.f64 t) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) (pow.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) #s(literal -1 binary64))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)) (pow.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) #s(literal -1 binary64))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) (pow.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) #s(literal -1 binary64))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)) (pow.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) #s(literal -1 binary64))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))))) (sqrt (+ (* (* (cos t) ew) (cos (atan (* (neg eh) (/ (tan t) ew))))) (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew)))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) (pow.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) #s(literal -1 binary64))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)) (pow.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) #s(literal -1 binary64))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (neg (* (sin t) eh)) (tanh (asinh (* (neg eh) (/ (tan t) ew))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) (pow.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) #s(literal -1 binary64))))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)) (pow.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) #s(literal -1 binary64))))))) |
#s(approx (tanh (asinh (* (neg eh) (/ (tan t) ew)))) (/.f64 (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) (pow.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) #s(literal -1 binary64))) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)) (pow.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) #s(literal -1 binary64)))))) |
#s(approx (asinh (* (neg eh) (/ (tan t) ew))) (log.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
Compiled 399 433 to 8 038 computations (98% saved)
6 alts after pruning (3 fresh and 3 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1 253 | 3 | 1 256 |
| Fresh | 0 | 0 | 0 |
| Picked | 1 | 3 | 4 |
| Done | 0 | 0 | 0 |
| Total | 1 254 | 6 | 1 260 |
| Status | Accuracy | Program |
|---|---|---|
| ✓ | 49.2% | (*.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
| ✓ | 99.7% | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| ▶ | 46.7% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) eh))) |
| ✓ | 90.3% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
| ▶ | 60.5% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
| ▶ | 32.9% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
Compiled 585 to 256 computations (56.2% saved)
| Inputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) |
(neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(literal -1 binary64) |
(*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
ew |
(*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(cos.f64 t) |
t |
(cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(*.f64 (/.f64 eh ew) (tan.f64 t)) |
(/.f64 eh ew) |
eh |
(tan.f64 t) |
(/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) |
(*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
(*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) |
(sin.f64 t) |
(-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) |
(exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
(log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) |
(*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) |
#s(literal 1/2 binary64) |
(/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) |
(*.f64 eh (sin.f64 t)) |
(exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) |
(neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
(+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew))) |
(neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)) |
(*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
(-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
(*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) |
(+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) |
#s(literal 1 binary64) |
(/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) |
(pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) |
(*.f64 ew (cos.f64 t)) |
(+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) |
(-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) eh))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) eh)) |
(*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) eh) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) |
(*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) |
(fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
(/.f64 eh (*.f64 ew ew)) |
(*.f64 ew ew) |
(/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) |
(pow.f64 (sin.f64 t) #s(literal 2 binary64)) |
(/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) |
| Outputs |
|---|
#s(approx (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) #s(hole binary64 (fabs (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow eh 2) (- (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t)))))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow eh 2) (- (* eh (- (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t)))))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* eh (+ (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin t))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (+ (sin t) (* eh (- (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (+ (sin t) (* eh (- (+ (* -2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (* (sin t) (- (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))))))) (* ew (cos t)))) (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t))))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t))))))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (cos (neg (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (neg (atan (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (atan (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (atan (* (/ eh ew) (tan t))) #s(hole binary64 (atan (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (/ (* eh (sin t)) (* ew (cos t))))) |
#s(approx (/ eh ew) #s(hole binary64 (/ eh ew))) |
#s(approx eh #s(hole binary64 eh)) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (sin t)))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (+ (sin t) (* eh (- (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (+ (sin t) (* eh (- (+ (* -2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (* (sin t) (- (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))))))) (* ew (cos t)))) (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t))))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (+ (sin t) (* eh (- (+ (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* eh (- (* 4 (/ (* eh (* (pow (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) 2) (* (pow (sin t) 2) (- (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))))))) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (* (sin t) (- (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t))))))) (* ew (cos t))))))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* 1/2 (* ew (cos t))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* eh (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (sin t)))) (* 1/2 (* ew (cos t)))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* 1/2 (/ (* ew (cos t)) eh)))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (/ (+ (* -1 (* eh (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (sin t)))) (* 1/2 (* ew (cos t)))) eh))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* -1 (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))))) (* 1/2 (/ (* ew (cos t)) (sin t)))) eh))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) |
#s(approx (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) #s(hole binary64 (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) #s(hole binary64 (* 1/2 (/ (cos t) (* eh (sin t)))))) |
#s(approx (/ (cos t) (* eh (sin t))) #s(hole binary64 (/ (cos t) (* eh (sin t))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* eh (sin t)))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))))) eh))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) ew)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* eh (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) ew)) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) ew))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* 1/2 (/ (* (pow eh 2) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* 1/2 (/ (* (pow eh 2) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* -1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1/4 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (+ (* -1/4 (/ (* (sin t) (* (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)) (* 1/2 (/ (* (pow (sin t) 2) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))) (* (pow ew 2) (pow (cos t) 2))))))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* 1/2 (* eh (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* 1/2 (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* eh (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* 1/2 (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* eh (- (+ (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (* 1/2 (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* 1/2 (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* eh (- (+ (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (+ (* 1/2 (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (* eh (- (* 1/2 (* (sin t) (+ (* -1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1/4 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t))))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 2) (pow (cos t) 2)))))))) (+ (* -1/4 (* (sin t) (* (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* (pow (sin t) 2) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* (pow ew 2) (pow (cos t) 2))))))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* eh (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* eh (+ (* eh (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* eh (+ (* eh (+ (* eh (* (sin t) (+ (* -1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1/4 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t))))))) (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))))) (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* eh (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* eh (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* eh (+ (* -1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1/4 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 1)) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (* (pow eh 2) (+ (* -1/8 (/ (* (pow eh 2) (pow (sin t) 4)) (* (pow ew 4) (pow (cos t) 4)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (* (pow eh 2) (+ (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* (pow eh 2) (+ (* -1/8 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 1/16 (/ (* (pow eh 2) (pow (sin t) 6)) (* (pow ew 6) (pow (cos t) 6))))))))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 1)) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) #s(hole binary64 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) |
#s(approx (pow (* eh (sin t)) 2) #s(hole binary64 (* (pow eh 2) (pow (sin t) 2)))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 1)) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* eh (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* eh (- (+ (* -1 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (/ (sin t) (* ew (cos t)))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* eh (- (+ (* eh (- (* -1 (* eh (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (/ (sin t) (* ew (cos t)))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 1)) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (* eh (- (* -1 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (* eh (- (* eh (- (* -1 (* eh (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 1)) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* eh (- (* 1/2 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))) (/ (sin t) (* ew (cos t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* eh (- (* eh (+ (* -1/8 (/ (* (pow eh 2) (pow (sin t) 4)) (* (pow ew 4) (pow (cos t) 4)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (/ (sin t) (* ew (cos t)))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 2)) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* -1 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* eh (- (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* eh (- (* eh (- (* -1 (* eh (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 2)) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (* eh (- (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (* eh (- (* eh (- (* -1 (* eh (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (- (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (- (* eh (- (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))) eh))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (+ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) eh))) |
#s(approx (/ eh (* ew ew)) #s(hole binary64 (/ eh (pow ew 2)))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (sin t))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* eh (- (+ (* -1 (sin t)) (+ (* -1 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* eh (- (+ (* -1 (sin t)) (+ (* -1 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t))))) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* eh (- (+ (* -1 (sin t)) (+ (* -1 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (- (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 3) (* (pow (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) 2) (pow (sin t) 2))))) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (* 1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t)))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* eh (sin t))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (- (+ (* -1 (sin t)) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (- (+ (* -1 (sin t)) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t))))) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (- (+ (* -1 (sin t)) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (- (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 3) (* (pow (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) 2) (pow (sin t) 2))))) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (* 1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t)))))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t)))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* eh (+ (* -1 (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t))) (* 1/2 (/ (* ew (cos t)) eh)))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t))) (* 1/2 (/ (* ew (cos t)) eh))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* -1 (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (+ (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (- (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (- (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) ew)))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (/ (* eh (sin t)) ew)))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4))))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (* eh (sin t)) ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)))) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4))))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (+ (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/8 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))))) (pow eh 6))) (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4)))))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (+ (* -1/8 (/ (* (pow ew 4) (* (pow (cos t) 4) (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))))) (* (pow eh 6) (pow (sin t) 4)))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (pow (sin t) 3))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (sin t))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 6) (sin t)))) (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2))))) (pow eh 6)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (sin t)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (* -1 (sin t)) (* 1/2 (/ (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2)))) (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (* -1 (sin t)) (+ (* 1/2 (/ (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (* 1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow eh 4))))) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (+ (* 1/8 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (* -1 (sin t)) (+ (* 1/2 (/ (* ew (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/8 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2))))))) (pow eh 6))) (+ (* 1/2 (/ (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (* 1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow eh 4)))))) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (+ (* -1/8 (/ (* (pow ew 4) (* (pow (cos t) 4) (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))))) (* (pow eh 6) (pow (sin t) 4)))) (+ (* 1/8 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))))) (+ (* 1/8 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 3))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (sin t))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 6) (sin t)))) (* 1/2 (/ (* ew (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))))) (pow eh 6))))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -2 (/ (* eh (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* -2 (/ (pow (sin t) 2) (* ew (cos t)))) (/ (* (sin t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* -2 (/ (pow (sin t) 2) (* ew (cos t)))) (+ (/ (* (sin t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)) (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* -2 (/ (pow (sin t) 2) (* ew (cos t)))) (+ (/ (* (sin t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/8 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))))) (pow eh 6)) (+ (/ (* (sin t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)) (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -2 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t))))) (* 2 (/ (sin t) (* ew (cos t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t))))))) (* 2 (/ (sin t) (* ew (cos t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* (pow eh 6) (* ew (cos t))))) (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/8 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (* (pow eh 6) (pow (sin t) 2)))) (+ (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))))) (* 2 (/ (sin t) (* ew (cos t)))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (/ (* eh (sin t)) (* ew (cos t))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* eh (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* eh (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t)))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* eh (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (* (pow eh 2) (+ (/ 1 (pow eh 2)) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (- (+ (* -1 (/ (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))) (pow eh 4))) (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (- (+ (* -1 (/ (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2))))) (pow eh 6))) (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* 2 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* eh (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 2 (/ (sin t) (* ew (cos t)))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* eh (- (+ (* -1 (/ (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))) (pow eh 4))) (* 2 (/ (sin t) (* ew (cos t))))) (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* eh (- (+ (* -1 (/ (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2))))) (pow eh 6))) (* 2 (/ (sin t) (* ew (cos t))))) (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 2) (pow (sin t) 3)))) (* 1/2 (/ (* ew (cos t)) (sin t)))) eh))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 2) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 4) (pow (sin t) 5)))) (* 1/2 (/ (* ew (cos t)) (sin t))))) eh))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6)))))) (* (pow eh 6) (sin t)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 2) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 4) (pow (sin t) 5)))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) eh))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* 2 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 2 (/ (sin t) (* ew (cos t))))) (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (- (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 2 (/ (sin t) (* ew (cos t)))))) (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (- (+ (* -1 (/ (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))) (pow eh 6))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 2 (/ (sin t) (* ew (cos t)))))) (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* eh (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* eh (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* eh (- (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* eh (- (+ (* -1 (/ (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))) (pow eh 6))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (+ (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (* eh (pow (sin t) 2)) (* ew (cos t))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* eh (+ (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (pow eh 2)) (/ (pow (sin t) 2) (* ew (cos t))))))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (* eh (+ (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (pow eh 2)) (/ (pow (sin t) 2) (* (pow ew 2) (cos t))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (- (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (- (* -1 (/ (- (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2)) (* -1 (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))))) eh)) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) eh))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (+ (* -1 (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))) (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2)))) eh))) eh))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (+ (sin t) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) eh))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (+ (sin t) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (* -1 (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))))) (* 1/2 (/ (* ew (* (cos t) (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) (* eh (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t))))))) eh))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (+ (sin t) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (* -1 (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1/2 (/ (* ew (* (cos t) (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) (* eh (* (pow (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) 2) (pow (sin t) 2)))))) eh)))) eh))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* eh (- (+ (sin t) (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))))) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* eh (+ (sin t) (* -1 (/ (+ (* -1 (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))))) (* 1/2 (/ (* ew (* (cos t) (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) (* eh (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t)))))) eh))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* eh (+ (sin t) (* -1 (/ (+ (* -1 (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1/2 (/ (* ew (* (cos t) (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) (* eh (* (pow (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) 2) (pow (sin t) 2)))))) eh))) eh))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t)))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (+ (* -1/2 (/ (* ew (cos t)) eh)) (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t))))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t))) (* 1/2 (/ (* ew (cos t)) eh))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* -1 (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (+ (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (* -1 (/ (- (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* eh ew)) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (* -1 (/ (- (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 2) ew))) (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) ew))) eh)) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (* eh (sin t)) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* eh (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (+ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* eh (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) eh))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (- (* -1 (/ (+ (* -1 (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* -1 (/ (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))) eh)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (* eh (sin t)) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (+ (* -1 (/ (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 4))) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (+ (* -1 (/ (- (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (pow eh 6))) (+ (* -1 (/ (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 4))) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (sin t))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (sin t) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (sin t) (+ (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (sin t) (+ (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5)))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (pow eh 4)) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5)))))) (pow eh 6)) (+ (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (pow eh 4)) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (* eh (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (* eh (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t)))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (/ (sin t) (* ew (cos t)))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (* eh (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 6) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 6) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (/ (sin t) (* ew (cos t))))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* -1 (* eh (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t)))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* -1 (* eh (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* -1 (* eh (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t)))))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (* eh (sin t)) (* ew (cos t))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* -1 (/ (sin t) (* ew (cos t)))) (+ (* -1 (/ (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (pow eh 6))) (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (/ -1 (* eh (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) eh)))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* -1 (/ (- (+ (* -1 (/ (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (pow eh 4))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) eh)))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* -1 (/ (- (+ (* -1 (/ (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (+ (* 1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (pow eh 6))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))) eh)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t)))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t))))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t)))))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (sin t) (* ew (cos t))))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (sin t) (* ew (cos t)))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (sin t) (* ew (cos t))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 6) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 6) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* -1 (* eh (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (sin t) (* ew (cos t)))))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (sin t) (* ew (cos t))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 6) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 6) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (+ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) eh)) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (- (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))) eh))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (pow eh 2))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (pow eh 2))) (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (- (* -1 (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (- (* ew (- (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))) (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* ew (+ (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* eh (sin t))) (* ew (- (+ (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* eh (sin t))) (* ew (- (+ (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* eh (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t))))) (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* eh (sin t))) (* ew (- (+ (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* ew (- (* 1/4 (/ (* ew (* (pow (cos t) 2) (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* (pow eh 2) (* (pow (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) 2) (pow (sin t) 2))))) (* 1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* eh (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) |
#s(approx ew #s(hole binary64 ew)) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* eh (sin t))) (* ew (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* eh (sin t))) (* ew (- (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* eh (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t))))) (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* eh (sin t))) (* ew (- (+ (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* ew (- (* 1/4 (/ (* ew (* (pow (cos t) 2) (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* (pow eh 2) (* (pow (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) 2) (pow (sin t) 2))))) (* 1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* eh (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t)))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t)))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* eh (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t)))) (* 1/2 (* ew (cos t)))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t))) (* 1/2 (/ (* ew (cos t)) eh))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* -1 (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (+ (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* ew (- (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* ew (- (* ew (+ (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* ew (- (* ew (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* ew (- (* ew (- (+ (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* (pow ew 2) (- (+ (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* (pow ew 2) (- (+ (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow ew 2) (- (+ (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/8 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2)))))))) (+ (* -1/8 (/ (* (pow (cos t) 4) (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))))) (* (pow eh 4) (pow (sin t) 4)))) (+ (* 1/2 (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t))))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (* -1 (sin t)) (* (pow ew 2) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (* -1 (sin t)) (* (pow ew 2) (- (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* (pow ew 2) (- (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) eh)) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))) (* eh (sin t)))))))) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (* -1 (sin t)) (* (pow ew 2) (- (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* (pow ew 2) (- (+ (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) eh)) (* (pow ew 2) (- (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/8 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))) eh)) (+ (* -1/8 (/ (* (pow (cos t) 4) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh)))) (* (pow eh 4) (pow (sin t) 4)))) (+ (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) eh)) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))) (* eh (sin t)))))))) (* eh (sin t)))) (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2)))))) eh))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))) (* eh (sin t)))))))) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -2 (/ (* eh (pow (sin t) 2)) (cos t))) (* (pow ew 2) (* (sin t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -2 (/ (* eh (pow (sin t) 2)) (cos t))) (* (pow ew 2) (+ (* (sin t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) (* (pow ew 2) (* (sin t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))))))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -2 (/ (* eh (pow (sin t) 2)) (cos t))) (* (pow ew 2) (+ (* (sin t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) (* (pow ew 2) (+ (* (sin t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow ew 2) (* (sin t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/8 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))))))))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (* (pow ew 2) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) (* 2 (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (* (pow ew 2) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))))) (* 2 (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (* (pow ew 2) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (+ (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* (pow ew 2) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/8 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))))))))) (* 2 (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow ew 2) (cos t)) (* eh (sin t)))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (/ (+ (* (pow ew 2) (+ (* -1/8 (/ (* (pow ew 2) (pow (cos t) 3)) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (/ (+ (* (pow ew 2) (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/16 (/ (* (pow ew 2) (pow (cos t) 5)) (* (pow eh 5) (pow (sin t) 5)))))))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (/ (+ (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)) (pow ew 2)) (pow ew 2)))) |
#s(approx (pow (* ew (cos t)) 2) #s(hole binary64 (* (pow ew 2) (pow (cos t) 2)))) |
#s(approx (* ew (cos t)) #s(hole binary64 (* ew (cos t)))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow ew 2) (cos t)) (* eh (sin t)))) (+ (* 2 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (+ (* (pow ew 2) (- (* -1 (* (pow ew 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* -1/2 (/ (cos t) (* eh (sin t)))))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (+ (* (pow ew 2) (- (* (pow ew 2) (- (* -1 (* (pow ew 2) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/16 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2)))))))) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* -1/2 (/ (cos t) (* eh (sin t)))))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow ew 2) (cos t)) (* eh (sin t)))) (* 2 (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (* (pow ew 2) (- (* -1 (* (pow ew 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* -1/2 (/ (cos t) (* eh (sin t))))))) ew))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (* (pow ew 2) (- (* (pow ew 2) (- (* -1 (* (pow ew 2) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/16 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2)))))))) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* -1/2 (/ (cos t) (* eh (sin t))))))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* ew (+ (* -1/8 (/ (* (pow ew 2) (pow (cos t) 3)) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (cos t) (* eh (sin t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* ew (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/16 (/ (* (pow ew 2) (pow (cos t) 5)) (* (pow eh 5) (pow (sin t) 5)))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* ew (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* (pow ew 2) (+ (* -1/2 (/ (* (pow ew 2) (* (cos t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (* eh (sin t)))) (* 1/16 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (* (pow ew 2) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) ew))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (* (pow ew 2) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 3)) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1/2 (/ (cos t) (* eh (sin t))))))) ew))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (* (pow ew 2) (- (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (- (* -1 (* (pow ew 2) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* -1/2 (/ (cos t) (* eh (sin t))))))) ew))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (+ (* (pow ew 2) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (+ (* (pow ew 2) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 3)) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1/2 (/ (cos t) (* eh (sin t)))))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (+ (* (pow ew 2) (- (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (- (* -1 (* (pow ew 2) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* -1/2 (/ (cos t) (* eh (sin t)))))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (* -1 (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (* ew (+ (* -1 (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* ew (+ (* -1 (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* ew (+ (* ew (- (* -1 (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (pow ew 2) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) ew))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (pow ew 2) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (pow ew 2)))) |
#s(approx (* ew ew) #s(hole binary64 (pow ew 2))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (- (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (- (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (sin t)) ew))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* ew (- (+ (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* (pow ew 2) (cos t)))) (+ (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (sin t)) ew))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* (pow ew 2) (cos t)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* ew (- (+ (* -2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (* (sin t) (- (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* (pow ew 3) (cos t)))) (+ (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* (pow ew 2) (cos t)))) (+ (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (sin t)) ew)))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* (pow ew 2) (cos t)))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (- (+ (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* ew (cos t)))) (* eh (sin t))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* ew (cos t))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (- (+ (* -2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (* (sin t) (- (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* (pow ew 2) (cos t)))) (+ (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* ew (cos t)))) (* eh (sin t)))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* ew (cos t))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (- (+ (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* ew (cos t)))) (+ (* 4 (/ (* (pow eh 2) (* (pow (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) 2) (* (pow (sin t) 2) (- (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* (pow ew 3) (pow (cos t) 2)))) (* eh (sin t)))) (+ (* 2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (* (sin t) (- (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* (pow ew 2) (cos t)))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* ew (cos t)))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (sin t))) ew)) (* 1/2 (cos t)))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* ew (+ (* -1 (/ (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (sin t)) ew)) (* 1/2 (/ (cos t) eh)))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* ew (+ (* -1 (/ (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) ew)) (* 1/2 (/ (cos t) (* eh (sin t)))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* ew (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (/ (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) ew))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2)))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (pow ew 3))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (pow ew 4))) (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (pow ew 4))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (pow ew 3))) (+ (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 4) (pow (cos t) 2)))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* 1/2 (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) ew))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* 1/2 (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (* 1/2 (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (pow ew 2))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (pow ew 2))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) ew)) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2))))))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* 1/2 (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (+ (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t)))))) (pow ew 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (pow ew 2)))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (pow ew 2))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow (cos t) 2)))))) (pow ew 3))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) ew)) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (pow ew 3))) (+ (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (* (pow ew 3) (pow (cos t) 2)))))))))) (pow ew 2)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* 1/2 (/ (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* 1/2 (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* 1/2 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) ew))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* 1/2 (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))) (pow ew 2))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (pow ew 2))) (+ (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) ew)) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2))))))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* 1/2 (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (+ (* 1/2 (/ (* (sin t) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (+ (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t))))) (pow ew 3))) (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))) (pow ew 2)))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (pow ew 2))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow (cos t) 2)))))) (pow ew 3))) (+ (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) ew)) (+ (* -1/4 (/ (* (sin t) (* (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 3))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* (pow ew 3) (pow (cos t) 2)))))))))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (+ (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew) (/ (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))) (pow ew 2)))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (+ (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew) (+ (/ (* (sin t) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (+ (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t))))) (pow ew 3)) (/ (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))) (pow ew 2))))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2))))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* (pow ew 2) (pow (cos t) 3)))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* (pow ew 2) (cos t))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2))))))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* (pow ew 3) (pow (cos t) 2)))) (+ (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (* (pow ew 3) (pow (cos t) 4)))) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* (pow ew 2) (pow (cos t) 3)))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* (pow ew 2) (cos t))) (+ (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (* (pow ew 3) (cos t))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))))))))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (+ (* -1/8 (/ (* (pow eh 4) (pow (sin t) 4)) (* (pow ew 4) (pow (cos t) 4)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (+ (* -1/8 (/ (* (pow eh 4) (pow (sin t) 4)) (* (pow ew 4) (pow (cos t) 4)))) (+ (* 1/16 (/ (* (pow eh 6) (pow (sin t) 6)) (* (pow ew 6) (pow (cos t) 6)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 1 (/ (* eh (sin t)) (* ew (cos t)))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 1 (+ (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (pow ew 2))) (/ (* eh (sin t)) (* ew (cos t))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 1 (+ (* -1 (/ (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (pow ew 3))) (/ (* eh (sin t)) (* ew (cos t))))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (- (+ 1 (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (pow ew 2)))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (- (+ 1 (* -1 (/ (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (pow ew 3)))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 1 (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 1 (+ (* -1/8 (/ (* (pow eh 4) (pow (sin t) 4)) (* (pow ew 4) (pow (cos t) 4)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))))) (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* -1 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 2 (* -1 (/ (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (pow ew 3)))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (- (+ 2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (- (+ 2 (* -1 (/ (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (pow ew 3)))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (- (+ (* -1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (- (+ (* -1 (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 4))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* ew (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* -1 (/ (- (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (sin t)) ew)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1 (/ (- (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) ew)) (* eh (sin t))) ew)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -2 (/ (* eh (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (* (sin t) (- (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* ew (cos t)))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) ew)) (* eh (sin t))) ew)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (/ (- (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) ew)) (* eh (sin t))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -2 (/ (* eh (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (* (sin t) (- (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* ew (cos t)))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) ew)) (* eh (sin t))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (/ (- (* -4 (/ (* (pow eh 2) (* (pow (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) 2) (* (pow (sin t) 2) (- (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* ew (pow (cos t) 2)))) (* -2 (/ (* eh (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (* (sin t) (- (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))))))) (cos t)))) ew)) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) ew)) (* eh (sin t))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1/2 (cos t)) (/ (* eh (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (sin t))) ew)))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1/2 (/ (cos t) eh)) (/ (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (sin t)) ew)))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (/ (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) ew)))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) ew)) (* -1/2 (/ (cos t) (* eh (sin t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) (pow ew 3))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* -1 (/ (- (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) ew)) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (* ew (pow (cos t) 2)))))) (pow ew 3))) (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2)))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* -1/2 (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (/ (- (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) ew)) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (* ew (pow (cos t) 2)))))) ew)) (* -1/2 (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* -1 (/ (- (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))))))) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2)))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))))) ew))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))))))) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2)))))) ew)) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))))))) (* ew (pow (cos t) 2))))))) ew))) ew)) (* -1/2 (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) (pow ew 2)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1/2 (/ (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) ew)) (* 1/2 (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2))))) ew)) (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) ew)) (* 1/2 (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2))))))) (+ (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (pow (cos t) 2)))))) ew)) (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2))))) ew)) (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) ew)) (* 1/2 (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))) ew)))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) ew)))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew)) (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) ew)))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4)))))) ew)) (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))) ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew)) (/ (* eh (sin t)) (cos t))) (* -1 (/ (* eh (sin t)) (cos t)))) ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* -1 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (/ (* eh (sin t)) (cos t))) (* -1 (/ (* eh (sin t)) (cos t)))) ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* -1 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* -1 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) ew)) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew)) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (/ (* eh (sin t)) (cos t))) (* -1 (/ (* eh (sin t)) (cos t)))) ew)))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))))) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (* -1 (/ (- (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* ew (cos t)))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* ew (pow (cos t) 3))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (* -1 (/ (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2))))) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* ew (cos t)))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* ew (pow (cos t) 3))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (* -1 (/ (* eh (sin t)) (cos t)))) ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (* (pow eh 4) (pow (sin t) 4)) (* (pow ew 2) (pow (cos t) 4)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (* -1 (/ (* eh (sin t)) (cos t)))) ew))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* -1 (/ (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) ew))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* ew (cos t)))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* ew (pow (cos t) 3))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) ew))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (* -1 (/ (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* ew (cos t)))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* ew (pow (cos t) 3))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (- (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))) (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (- (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew) (* 1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (pow ew 3)))) (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* -1/2 (* ew (* t (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* t (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/6 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* -1 (* ew (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow t 2) (- (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow t 2) (- (* t (- (* -1 (* ew (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* ew (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* 1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* t (+ (* 1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* ew (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh t)))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* t (+ eh (* t (- (+ (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 1/2 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* t (+ eh (* t (- (+ (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (+ (* 1/2 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* t (- (* 2 (/ (* (pow eh 2) (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew)) (+ (* 2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))))) ew)) (/ (* (pow eh 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew)))))) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (+ (* -1/2 (* ew (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (+ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (* ew (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (+ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* -1/720 (* ew (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/24 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* -1/2 (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/24 (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/720 (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (cos t) #s(hole binary64 1)) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* -1/2 (pow t 2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* 1/24 (pow t 2)) 1/2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/24 (* -1/720 (pow t 2)))) 1/2))))) |
#s(approx t #s(hole binary64 t)) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (/ (* eh t) ew))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* 1/3 (/ (* eh (pow t 2)) ew)) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 2/15 (/ (* eh (pow t 2)) ew)) (* 1/3 (/ eh ew)))) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 1/3 (/ eh ew)) (* (pow t 2) (+ (* 17/315 (/ (* eh (pow t 2)) ew)) (* 2/15 (/ eh ew)))))) (/ eh ew))))) |
#s(approx (tan t) #s(hole binary64 t)) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* 1/3 (pow t 2)))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* 2/15 (pow t 2)))))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* (pow t 2) (+ 2/15 (* 17/315 (pow t 2)))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh t))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* t (+ eh (* t (- (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* t (+ eh (* t (- (+ (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* t (- (* 2 (/ (* (pow eh 2) (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew)) (+ (* 2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))))) ew)) (/ (* (pow eh 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))))) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* t (+ eh (* t (- (+ (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* t (- (+ (* 2 (/ (* (pow eh 2) (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew)) (* t (- (* 2 (/ (* (pow eh 2) (+ (* 1/6 (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew))) ew)) (+ (* -2 (/ (* (pow eh 3) (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) (pow ew 2))) (+ (* 2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* 2 (/ (* (pow eh 2) (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew)) (+ (* 2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))))) ew)) (/ (* (pow eh 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))))) ew)) (/ (* eh (* (- (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew)))))) (+ (* 2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))))) ew)) (/ (* (pow eh 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))))) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* 1/2 ew))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* eh (* t (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))))) (* 1/2 ew)))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* 1/2 ew) (* t (+ (* -1 (* eh (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))))) (* eh (* t (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* 1/2 ew) (* t (+ (* -1 (* eh (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))))) (* t (+ (* eh (* t (+ (* 1/6 (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew)))) (* eh (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))))))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* 1/2 (/ ew eh)))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* t (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))))) (* 1/2 (/ ew eh))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* 1/2 (/ ew eh)) (* t (+ (* -1 (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) (* t (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* 1/2 (/ ew eh)) (* t (+ (* -1 (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) (* t (+ (* -1/12 (/ ew eh)) (+ (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* t (+ (* 1/6 (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew))))))))))) |
#s(approx (sin t) #s(hole binary64 t)) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* -1/6 (pow t 2)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* 1/120 (pow t 2)) 1/6)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/120 (* -1/5040 (pow t 2)))) 1/6)))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* 1/2 (/ ew (* eh t))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* -1 (* t (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))))) (* 1/2 (/ ew eh))) t))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* t (- (* 1/2 (* t (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))))) t))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* t (- (* t (+ (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (/ (* eh (* t (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew))) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))))) t))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* 1/2 (/ ew (* eh t))))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (/ (+ (* 1/2 (* (pow t 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) (* 1/2 (/ ew eh))) t))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* (pow t 2) (+ (* 1/2 (* (pow t 2) (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))) t))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* (pow t 2) (+ (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* (pow t 2) (+ (* 1/2 (* (pow t 2) (- (* -1/720 (/ ew eh)) (+ (* -1/6 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) (+ (* -1/5040 (/ ew eh)) (* 1/120 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))))) (* 1/2 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))))))) t))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ ew eh))) (+ (* -1 (log t)) (/ (* eh (* (pow t 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ ew eh))) (+ (* -1 (log t)) (* (pow t 2) (+ (* 1/24 (* (pow t 2) (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew))))) (/ (* eh (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ ew eh))) (+ (* -1 (log t)) (* (pow t 2) (+ (* (pow t 2) (+ (* 1/720 (* (pow t 2) (+ (* -720 (/ (* (pow eh 2) (* (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))) (pow ew 2))) (+ (* 240 (/ (* (pow eh 3) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 3)) (pow ew 3))) (* 720 (/ (* eh (- (* -1/720 (/ ew eh)) (+ (* -1/6 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) (+ (* -1/5040 (/ ew eh)) (* 1/120 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))))) ew)))))) (* 1/24 (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew)))))) (/ (* eh (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))))))) |
#s(approx (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) #s(hole binary64 (* 1/2 (/ ew (* eh t))))) |
#s(approx (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) #s(hole binary64 (/ (+ (* 1/2 (* (pow t 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) (* 1/2 (/ ew eh))) t))) |
#s(approx (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* (pow t 2) (+ (* 1/2 (* (pow t 2) (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))) t))) |
#s(approx (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* (pow t 2) (+ (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* (pow t 2) (+ (* 1/2 (* (pow t 2) (- (* -1/720 (/ ew eh)) (+ (* -1/6 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) (+ (* -1/5040 (/ ew eh)) (* 1/120 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))))) (* 1/2 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))))))) t))) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) #s(hole binary64 (/ 1/2 (* eh t)))) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) #s(hole binary64 (/ (+ (* -1/6 (/ (pow t 2) eh)) (* 1/2 (/ 1 eh))) t))) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* -1/90 (/ (pow t 2) eh)) (* 1/6 (/ 1 eh)))) (* 1/2 (/ 1 eh))) t))) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* (pow t 2) (- (* -1/945 (/ (pow t 2) eh)) (* 1/90 (/ 1 eh)))) (* 1/6 (/ 1 eh)))) (* 1/2 (/ 1 eh))) t))) |
#s(approx (/ (cos t) (* eh (sin t))) #s(hole binary64 (/ 1 (* eh t)))) |
#s(approx (/ (cos t) (* eh (sin t))) #s(hole binary64 (/ (+ (* -1/3 (/ (pow t 2) eh)) (/ 1 eh)) t))) |
#s(approx (/ (cos t) (* eh (sin t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* -1/45 (/ (pow t 2) eh)) (* 1/3 (/ 1 eh)))) (/ 1 eh)) t))) |
#s(approx (/ (cos t) (* eh (sin t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* (pow t 2) (- (* -2/945 (/ (pow t 2) eh)) (* 1/45 (/ 1 eh)))) (* 1/3 (/ 1 eh)))) (/ 1 eh)) t))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* eh t))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* -1/6 (* eh (pow t 2))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* 1/120 (* eh (pow t 2))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* (pow t 2) (+ (* -1/5040 (* eh (pow t 2))) (* 1/120 eh))))))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (+ (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (* -1 (/ (* eh (* (pow t 2) (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (+ (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (* (pow t 2) (+ (* -1 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew)) (* (pow t 2) (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (+ (* -1/24 (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew)))) (* 1/2 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))))))))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (+ (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (* (pow t 2) (+ (* -1 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew)) (* (pow t 2) (+ (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (+ (* -1/24 (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew)))) (* 1/2 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))))) (* (pow t 2) (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (+ (* -1/6 (/ (* (pow eh 3) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 3)) (pow ew 3))) (+ (* -1/720 (+ (* -720 (/ (* (pow eh 2) (* (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))) (pow ew 2))) (+ (* 240 (/ (* (pow eh 3) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 3)) (pow ew 3))) (* 720 (/ (* eh (- (* -1/720 (/ ew eh)) (+ (* -1/6 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) (+ (* -1/5040 (/ ew eh)) (* 1/120 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))))) ew))))) (* 1/24 (/ (* eh (* (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew))))))))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (- (* -1 (/ (* eh (* (pow t 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew)) (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (- (* (pow t 2) (- (* -1/24 (* (pow t 2) (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew))))) (/ (* eh (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))) (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (- (* (pow t 2) (- (* (pow t 2) (- (* -1/720 (* (pow t 2) (+ (* -720 (/ (* (pow eh 2) (* (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))) (pow ew 2))) (+ (* 240 (/ (* (pow eh 3) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 3)) (pow ew 3))) (* 720 (/ (* eh (- (* -1/720 (/ ew eh)) (+ (* -1/6 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) (+ (* -1/5040 (/ ew eh)) (* 1/120 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))))) ew)))))) (* 1/24 (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew)))))) (/ (* eh (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))) (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* 1/2 (/ ew (* eh t))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* t (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))))) t))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* t (+ (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (* 1/2 (* t (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))))) t))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* t (+ (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (* t (+ (* -1 (/ (* eh (* t (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))))) t))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) ew))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* t (+ (* 1/2 (/ (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) ew)) (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow t 2) (- (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow t 2) (- (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow t 2) (- (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (+ (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (+ (* 1/24 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3)))))))) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* 1/2 (/ (* eh (* (pow t 2) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (+ (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3))))))) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (+ (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (+ (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (* t (- (* 1/2 (/ (* eh (- (+ (* -2/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (+ (* -1/6 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (/ (* eh (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) ew)))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3))))))) (+ (* -1/4 (/ (* eh (* (+ (* -1/3 (/ eh ew)) (+ (* 1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)) (* 1/2 (/ (* (pow eh 2) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))) (pow ew 2)))))))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3))))))) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* 1/2 (* (pow t 2) (- (* -1 (/ eh ew)) (/ eh ew)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (- (* -1 (/ eh ew)) (/ eh ew))) (* t (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (- (* -1 (/ eh ew)) (/ eh ew))) (* t (- (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* t (- (* 1/2 (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew))))))) (* 1/4 (/ (* (pow eh 2) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 2))))))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (- (* -1 (/ eh ew)) (/ eh ew))) (* t (- (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* t (- (+ (* 1/2 (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (* t (- (* 1/2 (- (+ (* -2/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (+ (* -1/6 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (/ (* eh (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) ew)))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew))))))) (* 1/4 (/ (* (pow eh 2) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 2))))))) (+ (* -1/4 (* (+ (* -1/3 (/ eh ew)) (+ (* 1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (- (* -1 (/ eh ew)) (/ eh ew)))) (* 1/2 (/ (* (pow eh 2) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))) (pow ew 2)))))))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew))))))) (* 1/4 (/ (* (pow eh 2) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 2))))))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (- (* -1 (/ eh ew)) (/ eh ew))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (/ eh ew)) (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))))) (/ eh ew))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (/ eh ew)) (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* t (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (/ (pow eh 2) (pow ew 2)))))) (/ eh ew))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (/ eh ew)) (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* t (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (+ (* t (- (+ (* -2/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (+ (* -1/6 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (/ (* eh (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) ew)))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))) (* 1/3 (/ eh ew)))) (/ (pow eh 2) (pow ew 2)))))) (/ eh ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (- (* -1 (/ eh ew)) (/ eh ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (- (+ (* -1 (/ eh ew)) (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))))) (/ eh ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (- (+ (* -1 (/ eh ew)) (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* t (- (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))) (* 1/3 (/ eh ew)))) (/ (pow eh 2) (pow ew 2)))))) (/ eh ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (- (+ (* -1 (/ eh ew)) (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* t (- (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (+ (* t (- (+ (* -2/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (/ (* eh (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) ew))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (/ (pow eh 2) (pow ew 2)))))) (/ eh ew))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (* 1/2 (/ (* (pow eh 2) (pow t 2)) (pow ew 2)))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* 1/2 (* (pow t 2) (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* 1/2 (/ (pow eh 2) (pow ew 2))) (* (pow t 2) (+ (* 1/2 (* (pow t 2) (- (* 2/45 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (+ (* 1/3 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (* (pow eh 2) (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) (pow ew 2)))))))) (* 1/2 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))))))))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (+ 1 (/ (* (pow eh 2) (pow t 2)) (pow ew 2))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* (pow t 2) (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (/ (pow eh 2) (pow ew 2))))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* (pow t 2) (- (+ (* -1/3 (/ (pow eh 2) (pow ew 2))) (* (pow t 2) (- (* 2/45 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (* 1/3 (/ (pow eh 2) (pow ew 2))))))) (* -1 (/ (pow eh 2) (pow ew 2))))) (/ (pow eh 2) (pow ew 2))))))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) #s(hole binary64 (/ (* (pow eh 2) (pow t 2)) (pow ew 2)))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) #s(hole binary64 (* (pow t 2) (+ (* (pow t 2) (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (/ (pow eh 2) (pow ew 2)))))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) #s(hole binary64 (* (pow t 2) (+ (* (pow t 2) (- (+ (* -1/3 (/ (pow eh 2) (pow ew 2))) (* (pow t 2) (- (* 2/45 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (* 1/3 (/ (pow eh 2) (pow ew 2))))))) (* -1 (/ (pow eh 2) (pow ew 2))))) (/ (pow eh 2) (pow ew 2)))))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) #s(hole binary64 (* (pow t 2) (+ (* (pow t 2) (- (+ (* -1/3 (/ (pow eh 2) (pow ew 2))) (* (pow t 2) (- (+ (* 2/45 (/ (pow eh 2) (pow ew 2))) (* (pow t 2) (- (* -1/315 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (- (* 2/45 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (* 1/3 (/ (pow eh 2) (pow ew 2)))))) (+ (* -2/45 (/ (pow eh 2) (pow ew 2))) (* 1/3 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2)))))))))) (+ (* -1 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (* 1/3 (/ (pow eh 2) (pow ew 2))))))) (* -1 (/ (pow eh 2) (pow ew 2))))) (/ (pow eh 2) (pow ew 2)))))) |
#s(approx (pow (* eh (sin t)) 2) #s(hole binary64 (* (pow eh 2) (pow t 2)))) |
#s(approx (pow (* eh (sin t)) 2) #s(hole binary64 (* (pow t 2) (+ (* -1/3 (* (pow eh 2) (pow t 2))) (pow eh 2))))) |
#s(approx (pow (* eh (sin t)) 2) #s(hole binary64 (* (pow t 2) (+ (* (pow t 2) (+ (* -1/3 (pow eh 2)) (* 2/45 (* (pow eh 2) (pow t 2))))) (pow eh 2))))) |
#s(approx (pow (* eh (sin t)) 2) #s(hole binary64 (* (pow t 2) (+ (* (pow t 2) (+ (* -1/3 (pow eh 2)) (* (pow t 2) (+ (* -1/315 (* (pow eh 2) (pow t 2))) (* 2/45 (pow eh 2)))))) (pow eh 2))))) |
#s(approx (pow (* ew (cos t)) 2) #s(hole binary64 (pow ew 2))) |
#s(approx (pow (* ew (cos t)) 2) #s(hole binary64 (+ (* -1 (* (pow ew 2) (pow t 2))) (pow ew 2)))) |
#s(approx (pow (* ew (cos t)) 2) #s(hole binary64 (+ (* (pow t 2) (+ (* -1 (pow ew 2)) (* 1/3 (* (pow ew 2) (pow t 2))))) (pow ew 2)))) |
#s(approx (pow (* ew (cos t)) 2) #s(hole binary64 (+ (* (pow t 2) (+ (* -1 (pow ew 2)) (* (pow t 2) (+ (* -2/45 (* (pow ew 2) (pow t 2))) (* 1/3 (pow ew 2)))))) (pow ew 2)))) |
#s(approx (* ew (cos t)) #s(hole binary64 ew)) |
#s(approx (* ew (cos t)) #s(hole binary64 (+ ew (* -1/2 (* ew (pow t 2)))))) |
#s(approx (* ew (cos t)) #s(hole binary64 (+ ew (* (pow t 2) (+ (* -1/2 ew) (* 1/24 (* ew (pow t 2)))))))) |
#s(approx (* ew (cos t)) #s(hole binary64 (+ ew (* (pow t 2) (+ (* -1/2 ew) (* (pow t 2) (+ (* -1/720 (* ew (pow t 2))) (* 1/24 ew)))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* t (- (/ eh ew) (* -1 (/ eh ew))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* t (- (+ (* -1 (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (/ eh ew)) (* -1 (/ eh ew))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* t (- (+ (* t (- (* t (- (* 1/3 (/ eh ew)) (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (/ eh ew)) (* -1 (/ eh ew))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (/ (* eh t) ew)))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (* t (- (* -1 (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (* -1 (/ eh ew))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (* t (- (* t (- (* -1 (* t (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (* -1 (/ eh ew))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (* eh t) ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* t (- (* 1/2 (/ (* (pow eh 2) t) (pow ew 2))) (/ eh ew)))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* t (- (* t (+ (* -1/3 (/ (* eh t) ew)) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (/ eh ew)))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* -1 (* t (+ (* -1 (/ eh ew)) (/ eh ew))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* t (- (/ (* (pow eh 2) t) (pow ew 2)) (+ (* -1 (/ eh ew)) (/ eh ew))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* t (- (* t (- (* -1 (* t (+ (* -1/3 (/ eh ew)) (+ (* 1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) (* -1 (/ (pow eh 2) (pow ew 2))))) (+ (* -1 (/ eh ew)) (/ eh ew))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (/ (* eh t) ew)))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (* t (- (/ (* (pow eh 2) t) (pow ew 2)) (* -1 (/ eh ew))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (* t (- (* t (- (* -1 (* t (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))) (* -1 (/ (pow eh 2) (pow ew 2))))) (* -1 (/ eh ew))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* eh (* (pow t 2) (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew))))) (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* eh (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* eh (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew)))) (* t (+ (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* eh (* t (- (+ (* -1/2 (/ (pow eh 3) (pow ew 3))) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (+ (* -1/2 (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (+ (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* t (- (* t (- (+ (* -1/2 (/ (pow eh 3) (pow ew 3))) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))))) (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (+ (* ew (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2))))) (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (+ (* (pow t 2) (+ (* ew (* (pow t 2) (- (+ (* -1/3 (/ eh (pow ew 2))) (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 (/ eh (pow ew 2)))))) (* ew (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2)))))) (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (+ (* (pow t 2) (+ (* ew (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2)))) (* (pow t 2) (+ (* ew (* (pow t 2) (- (+ (* -1/720 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 2/45 (/ eh (pow ew 2)))) (+ (* -1/2 (- (* -1/3 (/ eh (pow ew 2))) (* -1/2 (/ eh (pow ew 2))))) (* 1/24 (/ eh (pow ew 2))))))) (* ew (- (+ (* -1/3 (/ eh (pow ew 2))) (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 (/ eh (pow ew 2))))))))) (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2)))) (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (+ (* (pow t 2) (- (+ (* -1/3 (/ eh (pow ew 2))) (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 (/ eh (pow ew 2))))) (/ eh (pow ew 2))))) (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (+ (* (pow t 2) (- (+ (* -1/3 (/ eh (pow ew 2))) (+ (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (- (+ (* -1/720 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 2/45 (/ eh (pow ew 2)))) (+ (* -1/2 (- (* -1/3 (/ eh (pow ew 2))) (* -1/2 (/ eh (pow ew 2))))) (* 1/24 (/ eh (pow ew 2)))))))) (* -1/2 (/ eh (pow ew 2))))) (/ eh (pow ew 2))))) (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (pow (sin t) 2) (cos t)) #s(hole binary64 (pow t 2))) |
#s(approx (/ (pow (sin t) 2) (cos t)) #s(hole binary64 (* (pow t 2) (+ 1 (* 1/6 (pow t 2)))))) |
#s(approx (/ (pow (sin t) 2) (cos t)) #s(hole binary64 (* (pow t 2) (+ 1 (* (pow t 2) (+ 1/6 (* 31/360 (pow t 2)))))))) |
#s(approx (/ (pow (sin t) 2) (cos t)) #s(hole binary64 (* (pow t 2) (+ 1 (* (pow t 2) (+ 1/6 (* (pow t 2) (+ 31/360 (* 173/5040 (pow t 2)))))))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (pow t 2))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (* (pow t 2) (+ 1 (* -1/3 (pow t 2)))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (* (pow t 2) (+ 1 (* (pow t 2) (- (* 2/45 (pow t 2)) 1/3)))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (* (pow t 2) (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 2/45 (* -1/315 (pow t 2)))) 1/3)))))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 1/24 (/ (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (+ (* -1/720 (/ (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))))) (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))))))) (+ (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))))) |
#s(approx (cos t) #s(hole binary64 (cos t))) |
#s(approx (tan t) #s(hole binary64 (/ (sin t) (cos t)))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (/ (* eh (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))))))) (+ (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* eh (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))))))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))))))) |
#s(approx (sin t) #s(hole binary64 (sin t))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (+ (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (/ (pow (sin t) 2) (cos t)) #s(hole binary64 (/ (pow (sin t) 2) (cos t)))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (pow (sin t) 2))) |
9 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 135.0ms | eh | @ | 0 | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (cos t) t (cos (neg (atan (* (/ eh ew) (tan t))))) (neg (atan (* (/ eh ew) (tan t)))) (atan (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (/ eh ew) eh (tan t) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) (* 1/2 (/ (cos t) (* eh (sin t)))) 1/2 (/ (cos t) (* eh (sin t))) (* eh (sin t)) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) (pow (* eh (sin t)) 2) 2 (pow (* ew (cos t)) 2) (* ew (cos t)) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (/ eh (* ew ew)) (* ew ew) (/ (pow (sin t) 2) (cos t)) (pow (sin t) 2) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) |
| 73.0ms | eh | @ | -inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (cos t) t (cos (neg (atan (* (/ eh ew) (tan t))))) (neg (atan (* (/ eh ew) (tan t)))) (atan (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (/ eh ew) eh (tan t) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) (* 1/2 (/ (cos t) (* eh (sin t)))) 1/2 (/ (cos t) (* eh (sin t))) (* eh (sin t)) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) (pow (* eh (sin t)) 2) 2 (pow (* ew (cos t)) 2) (* ew (cos t)) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (/ eh (* ew ew)) (* ew ew) (/ (pow (sin t) 2) (cos t)) (pow (sin t) 2) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) |
| 67.0ms | ew | @ | inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (cos t) t (cos (neg (atan (* (/ eh ew) (tan t))))) (neg (atan (* (/ eh ew) (tan t)))) (atan (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (/ eh ew) eh (tan t) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) (* 1/2 (/ (cos t) (* eh (sin t)))) 1/2 (/ (cos t) (* eh (sin t))) (* eh (sin t)) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) (pow (* eh (sin t)) 2) 2 (pow (* ew (cos t)) 2) (* ew (cos t)) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (/ eh (* ew ew)) (* ew ew) (/ (pow (sin t) 2) (cos t)) (pow (sin t) 2) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) |
| 66.0ms | eh | @ | inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (cos t) t (cos (neg (atan (* (/ eh ew) (tan t))))) (neg (atan (* (/ eh ew) (tan t)))) (atan (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (/ eh ew) eh (tan t) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) (* 1/2 (/ (cos t) (* eh (sin t)))) 1/2 (/ (cos t) (* eh (sin t))) (* eh (sin t)) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) (pow (* eh (sin t)) 2) 2 (pow (* ew (cos t)) 2) (* ew (cos t)) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (/ eh (* ew ew)) (* ew ew) (/ (pow (sin t) 2) (cos t)) (pow (sin t) 2) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) |
| 61.0ms | t | @ | -inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (cos t) t (cos (neg (atan (* (/ eh ew) (tan t))))) (neg (atan (* (/ eh ew) (tan t)))) (atan (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (/ eh ew) eh (tan t) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) (* 1/2 (/ (cos t) (* eh (sin t)))) 1/2 (/ (cos t) (* eh (sin t))) (* eh (sin t)) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) (pow (* eh (sin t)) 2) 2 (pow (* ew (cos t)) 2) (* ew (cos t)) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (/ eh (* ew ew)) (* ew ew) (/ (pow (sin t) 2) (cos t)) (pow (sin t) 2) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 4617 | 122162 |
| 0 | 4738 | 111638 |
| 0 | 14793 | 109535 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) |
(neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(literal -1 binary64) |
(*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
ew |
(*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(cos.f64 t) |
t |
(cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(*.f64 (/.f64 eh ew) (tan.f64 t)) |
(/.f64 eh ew) |
eh |
(tan.f64 t) |
(/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) |
(*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
(*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) |
(sin.f64 t) |
(-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) |
(exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
(log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) |
(*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) |
#s(literal 1/2 binary64) |
(/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) |
(*.f64 eh (sin.f64 t)) |
(exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) |
(neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
(+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew))) |
(neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)) |
(*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
(-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
(*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) |
(+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) |
#s(literal 1 binary64) |
(/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) |
(pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) |
(*.f64 ew (cos.f64 t)) |
(+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) |
(-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) eh))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) eh)) |
(*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) eh) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) |
(*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) |
(fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
(/.f64 eh (*.f64 ew ew)) |
(*.f64 ew ew) |
(/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) |
(pow.f64 (sin.f64 t) #s(literal 2 binary64)) |
(/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) |
#s(approx (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) #s(hole binary64 (fabs (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow eh 2) (- (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t)))))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow eh 2) (- (* eh (- (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t)))))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* eh (+ (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin t))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (+ (sin t) (* eh (- (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (+ (sin t) (* eh (- (+ (* -2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (* (sin t) (- (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))))))) (* ew (cos t)))) (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t))))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t))))))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (cos (neg (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (neg (atan (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (atan (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (atan (* (/ eh ew) (tan t))) #s(hole binary64 (atan (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (/ (* eh (sin t)) (* ew (cos t))))) |
#s(approx (/ eh ew) #s(hole binary64 (/ eh ew))) |
#s(approx eh #s(hole binary64 eh)) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (sin t)))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (+ (sin t) (* eh (- (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (+ (sin t) (* eh (- (+ (* -2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (* (sin t) (- (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))))))) (* ew (cos t)))) (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t))))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (+ (sin t) (* eh (- (+ (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* eh (- (* 4 (/ (* eh (* (pow (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) 2) (* (pow (sin t) 2) (- (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))))))) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (* (sin t) (- (* -2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t))))))) (* ew (cos t))))))) (* 2 (/ (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (pow (sin t) 2)) (* ew (cos t)))))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* 1/2 (* ew (cos t))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* eh (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (sin t)))) (* 1/2 (* ew (cos t)))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* 1/2 (/ (* ew (cos t)) eh)))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (/ (+ (* -1 (* eh (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) (sin t)))) (* 1/2 (* ew (cos t)))) eh))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* -1 (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))))) (* 1/2 (/ (* ew (cos t)) (sin t)))) eh))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))) |
#s(approx (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) #s(hole binary64 (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) #s(hole binary64 (* 1/2 (/ (cos t) (* eh (sin t)))))) |
#s(approx (/ (cos t) (* eh (sin t))) #s(hole binary64 (/ (cos t) (* eh (sin t))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* eh (sin t)))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (* -1 (log eh))))))) eh))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) ew)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* eh (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) ew)) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) ew))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* 1/2 (/ (* (pow eh 2) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* 1/2 (/ (* (pow eh 2) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* -1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1/4 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (+ (* -1/4 (/ (* (sin t) (* (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)) (* 1/2 (/ (* (pow (sin t) 2) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))) (* (pow ew 2) (pow (cos t) 2))))))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* 1/2 (* eh (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* 1/2 (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* eh (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* 1/2 (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* eh (- (+ (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (* 1/2 (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* 1/2 (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* eh (- (+ (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (+ (* 1/2 (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (* eh (- (* 1/2 (* (sin t) (+ (* -1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1/4 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t))))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 2) (pow (cos t) 2)))))))) (+ (* -1/4 (* (sin t) (* (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* (pow (sin t) 2) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* (pow ew 2) (pow (cos t) 2))))))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* eh (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* eh (+ (* eh (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* eh (+ (* eh (+ (* eh (* (sin t) (+ (* -1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1/4 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t))))))) (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))))) (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* eh (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) (* ew (cos t)))) (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* eh (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* eh (+ (* -1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1/4 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 1)) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (* (pow eh 2) (+ (* -1/8 (/ (* (pow eh 2) (pow (sin t) 4)) (* (pow ew 4) (pow (cos t) 4)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (* (pow eh 2) (+ (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* (pow eh 2) (+ (* -1/8 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (* 1/16 (/ (* (pow eh 2) (pow (sin t) 6)) (* (pow ew 6) (pow (cos t) 6))))))))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 1)) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) #s(hole binary64 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) |
#s(approx (pow (* eh (sin t)) 2) #s(hole binary64 (* (pow eh 2) (pow (sin t) 2)))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 1)) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* eh (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* eh (- (+ (* -1 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (/ (sin t) (* ew (cos t)))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* eh (- (+ (* eh (- (* -1 (* eh (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (/ (sin t) (* ew (cos t)))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 1)) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (* eh (- (* -1 (* eh (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (* eh (- (* eh (- (* -1 (* eh (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 1)) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* eh (- (* 1/2 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))) (/ (sin t) (* ew (cos t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* eh (- (* eh (+ (* -1/8 (/ (* (pow eh 2) (pow (sin t) 4)) (* (pow ew 4) (pow (cos t) 4)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (/ (sin t) (* ew (cos t)))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 2)) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* -1 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* eh (- (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* eh (- (* eh (- (* -1 (* eh (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 2)) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (* eh (- (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (* eh (- (* eh (- (* -1 (* eh (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (- (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (- (* eh (- (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))) eh))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (+ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) eh))) |
#s(approx (/ eh (* ew ew)) #s(hole binary64 (/ eh (pow ew 2)))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (sin t))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* eh (- (+ (* -1 (sin t)) (+ (* -1 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* eh (- (+ (* -1 (sin t)) (+ (* -1 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t))))) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* eh (- (+ (* -1 (sin t)) (+ (* -1 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (- (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 3) (* (pow (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) 2) (pow (sin t) 2))))) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (+ (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (* 1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t)))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* eh (sin t))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (- (+ (* -1 (sin t)) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (- (+ (* -1 (sin t)) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t))))) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh (- (+ (* -1 (sin t)) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (- (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 3) (* (pow (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) 2) (pow (sin t) 2))))) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (* 1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t)))))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t)))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* eh (+ (* -1 (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t))) (* 1/2 (/ (* ew (cos t)) eh)))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (sin t))) (* 1/2 (/ (* ew (cos t)) eh))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* -1 (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (+ (exp (neg (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))) (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (- (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (- (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) ew)))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (/ (* eh (sin t)) ew)))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4))))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (* eh (sin t)) ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)))) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4))))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (+ (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/8 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))))) (pow eh 6))) (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4)))))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (+ (* -1/8 (/ (* (pow ew 4) (* (pow (cos t) 4) (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))))) (* (pow eh 6) (pow (sin t) 4)))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (pow (sin t) 3))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (sin t))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 6) (sin t)))) (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2))))) (pow eh 6)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (sin t)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (* -1 (sin t)) (* 1/2 (/ (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2)))) (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (* -1 (sin t)) (+ (* 1/2 (/ (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (* 1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow eh 4))))) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (+ (* 1/8 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (* -1 (sin t)) (+ (* 1/2 (/ (* ew (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/8 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2))))))) (pow eh 6))) (+ (* 1/2 (/ (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (* 1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow eh 4)))))) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (+ (* -1/8 (/ (* (pow ew 4) (* (pow (cos t) 4) (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))))) (* (pow eh 6) (pow (sin t) 4)))) (+ (* 1/8 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))))) (+ (* 1/8 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 3))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (sin t))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 6) (sin t)))) (* 1/2 (/ (* ew (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))))) (pow eh 6))))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -2 (/ (* eh (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* -2 (/ (pow (sin t) 2) (* ew (cos t)))) (/ (* (sin t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* -2 (/ (pow (sin t) 2) (* ew (cos t)))) (+ (/ (* (sin t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)) (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (+ (* -2 (/ (pow (sin t) 2) (* ew (cos t)))) (+ (/ (* (sin t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/8 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))))) (pow eh 6)) (+ (/ (* (sin t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)) (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -2 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t))))) (* 2 (/ (sin t) (* ew (cos t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t))))))) (* 2 (/ (sin t) (* ew (cos t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (- (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* (pow eh 6) (* ew (cos t))))) (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/8 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (* (pow eh 6) (pow (sin t) 2)))) (+ (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))))) (* 2 (/ (sin t) (* ew (cos t)))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (/ (* eh (sin t)) (* ew (cos t))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* eh (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* eh (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t)))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* eh (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (* (pow eh 2) (+ (/ 1 (pow eh 2)) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (- (+ (* -1 (/ (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))) (pow eh 4))) (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (- (+ (* -1 (/ (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2))))) (pow eh 6))) (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* 2 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* eh (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 2 (/ (sin t) (* ew (cos t)))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* eh (- (+ (* -1 (/ (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))) (pow eh 4))) (* 2 (/ (sin t) (* ew (cos t))))) (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* eh (- (+ (* -1 (/ (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2))))) (pow eh 6))) (* 2 (/ (sin t) (* ew (cos t))))) (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 2) (pow (sin t) 3)))) (* 1/2 (/ (* ew (cos t)) (sin t)))) eh))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 2) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 4) (pow (sin t) 5)))) (* 1/2 (/ (* ew (cos t)) (sin t))))) eh))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* -1/2 (/ (* ew (* (cos t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6)))))) (* (pow eh 6) (sin t)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 2) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 4) (pow (sin t) 5)))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) eh))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* 2 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 2 (/ (sin t) (* ew (cos t))))) (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (- (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 2 (/ (sin t) (* ew (cos t)))))) (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* eh (- (+ (* -1 (/ (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))) (pow eh 6))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 2 (/ (sin t) (* ew (cos t)))))) (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* eh (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* eh (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* eh (- (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* eh (- (+ (* -1 (/ (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))) (pow eh 6))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* 2 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (+ (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (* eh (pow (sin t) 2)) (* ew (cos t))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* eh (+ (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (pow eh 2)) (/ (pow (sin t) 2) (* ew (cos t))))))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (* eh (+ (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (pow eh 2)) (/ (pow (sin t) 2) (* (pow ew 2) (cos t))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (- (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (- (* -1 (/ (- (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2)) (* -1 (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))))) eh)) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) eh))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (+ (* -1 (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))) (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2)))) eh))) eh))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (+ (sin t) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) eh))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (+ (sin t) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (* -1 (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))))) (* 1/2 (/ (* ew (* (cos t) (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) (* eh (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t))))))) eh))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (+ (sin t) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (+ (* -1 (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1/2 (/ (* ew (* (cos t) (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) (* eh (* (pow (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) 2) (pow (sin t) 2)))))) eh)))) eh))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* eh (- (+ (sin t) (* -1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))))) (* 1/2 (/ (* ew (cos t)) (* eh (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* eh (+ (sin t) (* -1 (/ (+ (* -1 (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))))) (* 1/2 (/ (* ew (* (cos t) (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) (* eh (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t)))))) eh))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* eh (+ (sin t) (* -1 (/ (+ (* -1 (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1/2 (/ (* ew (* (cos t) (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (- (* -1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) (* 1/2 (/ (* ew (cos t)) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))))) (* eh (* (pow (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) 2) (pow (sin t) 2)))))) eh))) eh))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t)))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (+ (* -1/2 (/ (* ew (cos t)) eh)) (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t))))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (sin t))) (* 1/2 (/ (* ew (cos t)) eh))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* -1 (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (+ (exp (neg (+ (log (* -1/2 (/ (* ew (cos t)) (sin t)))) (log (/ -1 eh))))) (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (* -1 (/ (- (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* eh ew)) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (* -1 (/ (- (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 2) ew))) (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) ew))) eh)) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (* eh (sin t)) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* eh (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (+ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* eh (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) eh))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (- (* -1 (/ (+ (* -1 (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* -1 (/ (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))) eh)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (* eh (sin t)) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (+ (* -1 (/ (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 4))) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (+ (* -1 (/ (- (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (pow eh 6))) (+ (* -1 (/ (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 4))) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (sin t))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (sin t) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (sin t) (+ (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (sin t) (+ (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5)))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (pow eh 4)) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5)))))) (pow eh 6)) (+ (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (pow eh 4)) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (* eh (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (* eh (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t)))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (/ (sin t) (* ew (cos t)))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (* eh (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 6) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 6) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (/ (sin t) (* ew (cos t))))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* -1 (* eh (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t)))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* -1 (* eh (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (* -1 (* eh (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t)))))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (* eh (sin t)) (* ew (cos t))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) (* ew (cos t)))) (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* -1 (/ (sin t) (* ew (cos t)))) (+ (* -1 (/ (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (pow eh 6))) (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (/ -1 (* eh (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) eh)))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* -1 (/ (- (+ (* -1 (/ (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (pow eh 4))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) eh)))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (* -1 (/ (- (+ (* -1 (/ (+ (* -1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (+ (* 1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow (sin t) 4) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow (sin t) 5) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (pow eh 6))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 4) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))) eh)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t)))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t))))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (/ (sin t) (* ew (cos t)))))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (sin t) (* ew (cos t))))) (* -1 (/ (sin t) (* ew (cos t))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (sin t) (* ew (cos t)))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (sin t) (* ew (cos t))))))) (+ (* -1 (/ (sin t) (* ew (cos t)))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 6) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 6) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* -1 (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* -1 (* eh (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (sin t) (* ew (cos t)))))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (* -1 (* eh (- (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (* (pow eh 6) (pow (sin t) 5)))) (+ (* 1/2 (/ (* ew (cos t)) (* (pow eh 2) (sin t)))) (+ (/ 1 (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (sin t) (* ew (cos t))))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow eh 6) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3))))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow eh 6) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (* 1/2 (/ (* ew (cos t)) (* (pow eh 4) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (+ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) eh)) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (- (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))) eh))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (pow eh 2))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (pow eh 2))) (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (- (* -1 (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (- (* ew (- (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))) (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* ew (+ (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* eh (sin t))) (* ew (- (+ (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* eh (sin t))) (* ew (- (+ (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* eh (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t))))) (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* eh (sin t))) (* ew (- (+ (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* ew (- (* 1/4 (/ (* ew (* (pow (cos t) 2) (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* (pow eh 2) (* (pow (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) 2) (pow (sin t) 2))))) (* 1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* eh (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) |
#s(approx ew #s(hole binary64 ew)) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* eh (sin t))) (* ew (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* eh (sin t))) (* ew (- (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* eh (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t))))) (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* eh (sin t))) (* ew (- (+ (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* ew (- (* 1/4 (/ (* ew (* (pow (cos t) 2) (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* (pow eh 2) (* (pow (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) 2) (pow (sin t) 2))))) (* 1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (* eh (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t)))))))) (* -1/2 (/ (cos t) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* eh (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t)))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* eh (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t)))) (* 1/2 (* ew (cos t)))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (sin t))) (* 1/2 (/ (* ew (cos t)) eh))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* -1 (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (+ (exp (neg (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* ew (- (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* ew (- (* ew (+ (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* ew (- (* ew (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* ew (- (* ew (- (+ (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* (pow ew 2) (- (+ (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* (pow ew 2) (- (+ (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow ew 2) (- (+ (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/8 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2)))))))) (+ (* -1/8 (/ (* (pow (cos t) 4) (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))))) (* (pow eh 4) (pow (sin t) 4)))) (+ (* 1/2 (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t))))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (* -1 (sin t)) (* (pow ew 2) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (* -1 (sin t)) (* (pow ew 2) (- (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* (pow ew 2) (- (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) eh)) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))) (* eh (sin t)))))))) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (* -1 (sin t)) (* (pow ew 2) (- (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* (pow ew 2) (- (+ (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) eh)) (* (pow ew 2) (- (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/8 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))) eh)) (+ (* -1/8 (/ (* (pow (cos t) 4) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh)))) (* (pow eh 4) (pow (sin t) 4)))) (+ (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) eh)) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))) (* eh (sin t)))))))) (* eh (sin t)))) (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2)))))) eh))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))) (* eh (sin t)))))))) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -2 (/ (* eh (pow (sin t) 2)) (cos t))) (* (pow ew 2) (* (sin t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -2 (/ (* eh (pow (sin t) 2)) (cos t))) (* (pow ew 2) (+ (* (sin t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) (* (pow ew 2) (* (sin t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))))))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -2 (/ (* eh (pow (sin t) 2)) (cos t))) (* (pow ew 2) (+ (* (sin t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) (* (pow ew 2) (+ (* (sin t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow ew 2) (* (sin t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/8 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))))))))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (* (pow ew 2) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) (* 2 (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (* (pow ew 2) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))))) (* 2 (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (* (pow ew 2) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (+ (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* (pow ew 2) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/8 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))))))))) (* 2 (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow ew 2) (cos t)) (* eh (sin t)))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (/ (+ (* (pow ew 2) (+ (* -1/8 (/ (* (pow ew 2) (pow (cos t) 3)) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (/ (+ (* (pow ew 2) (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/16 (/ (* (pow ew 2) (pow (cos t) 5)) (* (pow eh 5) (pow (sin t) 5)))))))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (/ (+ (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)) (pow ew 2)) (pow ew 2)))) |
#s(approx (pow (* ew (cos t)) 2) #s(hole binary64 (* (pow ew 2) (pow (cos t) 2)))) |
#s(approx (* ew (cos t)) #s(hole binary64 (* ew (cos t)))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow ew 2) (cos t)) (* eh (sin t)))) (+ (* 2 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (+ (* (pow ew 2) (- (* -1 (* (pow ew 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* -1/2 (/ (cos t) (* eh (sin t)))))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (+ (* (pow ew 2) (- (* (pow ew 2) (- (* -1 (* (pow ew 2) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/16 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2)))))))) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* -1/2 (/ (cos t) (* eh (sin t)))))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (/ (+ (* 1/2 (/ (* (pow ew 2) (cos t)) (* eh (sin t)))) (* 2 (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (* (pow ew 2) (- (* -1 (* (pow ew 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* -1/2 (/ (cos t) (* eh (sin t))))))) ew))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (* (pow ew 2) (- (* (pow ew 2) (- (* -1 (* (pow ew 2) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/16 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2)))))))) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* -1/2 (/ (cos t) (* eh (sin t))))))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* ew (+ (* -1/8 (/ (* (pow ew 2) (pow (cos t) 3)) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (cos t) (* eh (sin t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* ew (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/16 (/ (* (pow ew 2) (pow (cos t) 5)) (* (pow eh 5) (pow (sin t) 5)))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (* ew (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* (pow ew 2) (+ (* -1/2 (/ (* (pow ew 2) (* (cos t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (* eh (sin t)))) (* 1/16 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (* (pow ew 2) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) ew))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (* (pow ew 2) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 3)) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1/2 (/ (cos t) (* eh (sin t))))))) ew))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (* (pow ew 2) (- (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (- (* -1 (* (pow ew 2) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* -1/2 (/ (cos t) (* eh (sin t))))))) ew))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (+ (* (pow ew 2) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (+ (* (pow ew 2) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 3)) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1/2 (/ (cos t) (* eh (sin t)))))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (/ (+ (* 2 (/ (* eh (sin t)) (cos t))) (+ (* (pow ew 2) (- (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (* (pow ew 2) (- (* -1 (* (pow ew 2) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* -1/2 (/ (cos t) (* eh (sin t)))))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (* -1 (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (* ew (+ (* -1 (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* ew (+ (* -1 (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* ew (+ (* ew (- (* -1 (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (pow ew 2) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) ew))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (pow ew 2) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (pow ew 2)))) |
#s(approx (* ew ew) #s(hole binary64 (pow ew 2))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (- (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (- (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (sin t)) ew))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* ew (- (+ (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* (pow ew 2) (cos t)))) (+ (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (sin t)) ew))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* (pow ew 2) (cos t)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* ew (- (+ (* -2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (* (sin t) (- (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* (pow ew 3) (cos t)))) (+ (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* (pow ew 2) (cos t)))) (+ (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (sin t)) ew)))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* (pow ew 2) (cos t)))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (- (+ (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* ew (cos t)))) (* eh (sin t))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* ew (cos t))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (- (+ (* -2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (* (sin t) (- (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* (pow ew 2) (cos t)))) (+ (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* ew (cos t)))) (* eh (sin t)))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* ew (cos t))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (- (+ (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* ew (cos t)))) (+ (* 4 (/ (* (pow eh 2) (* (pow (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) 2) (* (pow (sin t) 2) (- (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* (pow ew 3) (pow (cos t) 2)))) (* eh (sin t)))) (+ (* 2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (* (sin t) (- (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* (pow ew 2) (cos t)))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (pow (sin t) 2))) (* ew (cos t)))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (sin t))) ew)) (* 1/2 (cos t)))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* ew (+ (* -1 (/ (* (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) (sin t)) ew)) (* 1/2 (/ (cos t) eh)))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* ew (+ (* -1 (/ (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) ew)) (* 1/2 (/ (cos t) (* eh (sin t)))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* ew (+ (* 1/2 (/ (cos t) (* eh (sin t)))) (/ (exp (neg (+ (log (* 1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ 1 ew)))))) ew))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2)))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (pow ew 3))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (pow ew 4))) (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (pow ew 4))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (pow ew 3))) (+ (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 4) (pow (cos t) 2)))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* 1/2 (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) ew))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* 1/2 (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (* 1/2 (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (pow ew 2))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (pow ew 2))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) ew)) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2))))))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* 1/2 (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (+ (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t)))))) (pow ew 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (pow ew 2)))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (pow ew 2))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow (cos t) 2)))))) (pow ew 3))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) ew)) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (pow ew 3))) (+ (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (* (pow ew 3) (pow (cos t) 2)))))))))) (pow ew 2)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* 1/2 (/ (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* 1/2 (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* 1/2 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) ew))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* 1/2 (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))) (pow ew 2))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (pow ew 2))) (+ (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) ew)) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2))))))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* 1/2 (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (+ (* 1/2 (/ (* (sin t) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (+ (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t))))) (pow ew 3))) (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))) (pow ew 2)))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (pow ew 2))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow (cos t) 2)))))) (pow ew 3))) (+ (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) ew)) (+ (* -1/4 (/ (* (sin t) (* (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 3))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* (pow ew 3) (pow (cos t) 2)))))))))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (+ (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew) (/ (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))) (pow ew 2)))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) (+ (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew) (+ (/ (* (sin t) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (+ (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t))))) (pow ew 3)) (/ (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))) (pow ew 2))))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2))))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* (pow ew 2) (pow (cos t) 3)))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* (pow ew 2) (cos t))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2))))))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* (pow ew 3) (pow (cos t) 2)))) (+ (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (* (pow ew 3) (pow (cos t) 4)))) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* (pow ew 2) (pow (cos t) 3)))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* (pow ew 2) (cos t))) (+ (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (* (pow ew 3) (cos t))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))))))))) (/ (* eh (sin t)) (cos t))) ew))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (+ (* -1/8 (/ (* (pow eh 4) (pow (sin t) 4)) (* (pow ew 4) (pow (cos t) 4)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (+ (* -1/8 (/ (* (pow eh 4) (pow (sin t) 4)) (* (pow ew 4) (pow (cos t) 4)))) (+ (* 1/16 (/ (* (pow eh 6) (pow (sin t) 6)) (* (pow ew 6) (pow (cos t) 6)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 1 (/ (* eh (sin t)) (* ew (cos t)))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 1 (+ (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (pow ew 2))) (/ (* eh (sin t)) (* ew (cos t))))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 1 (+ (* -1 (/ (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (pow ew 3))) (/ (* eh (sin t)) (* ew (cos t))))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (- (+ 1 (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (pow ew 2)))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (- (+ 1 (* -1 (/ (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (pow ew 3)))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 1 (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 1 (+ (* -1/8 (/ (* (pow eh 4) (pow (sin t) 4)) (* (pow ew 4) (pow (cos t) 4)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))))) (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* -1 (/ (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ 2 (* -1 (/ (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (pow ew 3)))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (- (+ 2 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))) (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (- (+ 2 (* -1 (/ (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (pow ew 3)))) (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (- (+ (* -1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (- (+ (* -1 (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 4))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* ew (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* -1 (/ (- (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (sin t)) ew)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1 (/ (- (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) ew)) (* eh (sin t))) ew)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -2 (/ (* eh (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (* (sin t) (- (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* ew (cos t)))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) ew)) (* eh (sin t))) ew)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (/ (- (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) ew)) (* eh (sin t))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -2 (/ (* eh (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (* (sin t) (- (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* ew (cos t)))) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) ew)) (* eh (sin t))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (/ (- (+ (* -1 (/ (- (* -4 (/ (* (pow eh 2) (* (pow (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) 2) (* (pow (sin t) 2) (- (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))))))) (* ew (pow (cos t) 2)))) (* -2 (/ (* eh (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (* (sin t) (- (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t))))))) (cos t)))) ew)) (* 2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) (* -2 (/ (* (pow eh 2) (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (pow (sin t) 2))) (cos t)))) ew)) (* eh (sin t))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1/2 (cos t)) (/ (* eh (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (sin t))) ew)))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1/2 (/ (cos t) eh)) (/ (* (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) (sin t)) ew)))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (/ (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) ew)))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (exp (neg (+ (log (* -1/2 (/ (cos t) (* eh (sin t))))) (* -1 (log (/ -1 ew)))))) ew)) (* -1/2 (/ (cos t) (* eh (sin t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) (pow ew 3))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* -1 (/ (- (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) ew)) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (* ew (pow (cos t) 2)))))) (pow ew 3))) (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2)))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* -1/2 (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (/ (- (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) ew)) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (* ew (pow (cos t) 2)))))) ew)) (* -1/2 (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* -1 (/ (- (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))))))) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2)))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))))) ew))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))))))) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2)))))) ew)) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))))))) (* ew (pow (cos t) 2))))))) ew))) ew)) (* -1/2 (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) (pow ew 2)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1/2 (/ (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) ew)) (* 1/2 (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2))))) ew)) (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) ew)) (* 1/2 (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2))))))) (+ (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (pow (cos t) 2)))))) ew)) (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2))))) ew)) (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) ew)) (* 1/2 (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))) ew)))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) ew)))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew)) (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) ew)))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4)))))) ew)) (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))) ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) ew)) (/ (* eh (sin t)) (cos t))) (* -1 (/ (* eh (sin t)) (cos t)))) ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* -1 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) ew)) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (/ (* eh (sin t)) (cos t))) (* -1 (/ (* eh (sin t)) (cos t)))) ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (- (+ (* -1 (/ (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* -1 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* -1 (/ (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))) ew)) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew)) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (/ (* eh (sin t)) (cos t))) (* -1 (/ (* eh (sin t)) (cos t)))) ew)))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))))) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (- (+ (* -1 (/ (* eh (sin t)) (cos t))) (* -1 (/ (- (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* ew (cos t)))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* ew (pow (cos t) 3))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (* -1 (/ (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2))))) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* ew (cos t)))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* ew (pow (cos t) 3))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (* -1 (/ (* eh (sin t)) (cos t)))) ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (* (pow eh 4) (pow (sin t) 4)) (* (pow ew 2) (pow (cos t) 4)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (* -1 (/ (* eh (sin t)) (cos t)))) ew))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (+ (* -1 (/ (* eh (sin t)) (* ew (cos t)))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* -1 (/ (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) ew))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* ew (cos t)))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* ew (pow (cos t) 3))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) ew))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (* -1 (/ (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (pow (cos t) 2)))) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* ew (cos t)))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (* ew (pow (cos t) 3))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (/ (* eh (sin t)) (cos t))) ew))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (- (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))) (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (- (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew) (* 1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (pow ew 3)))) (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* -1/2 (* ew (* t (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* t (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/6 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* -1 (* ew (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow t 2) (- (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow t 2) (- (* t (- (* -1 (* ew (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* ew (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* 1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* t (+ (* 1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* ew (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* -1 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh t)))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* t (+ eh (* t (- (+ (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 1/2 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* t (+ eh (* t (- (+ (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (+ (* 1/2 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* t (- (* 2 (/ (* (pow eh 2) (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew)) (+ (* 2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))))) ew)) (/ (* (pow eh 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew)))))) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (+ (* -1/2 (* ew (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (+ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (* ew (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (+ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* -1/720 (* ew (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (* 1/24 (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* -1/2 (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/24 (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/720 (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (cos t) #s(hole binary64 1)) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* -1/2 (pow t 2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* 1/24 (pow t 2)) 1/2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/24 (* -1/720 (pow t 2)))) 1/2))))) |
#s(approx t #s(hole binary64 t)) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (/ (* eh t) ew))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* 1/3 (/ (* eh (pow t 2)) ew)) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 2/15 (/ (* eh (pow t 2)) ew)) (* 1/3 (/ eh ew)))) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 1/3 (/ eh ew)) (* (pow t 2) (+ (* 17/315 (/ (* eh (pow t 2)) ew)) (* 2/15 (/ eh ew)))))) (/ eh ew))))) |
#s(approx (tan t) #s(hole binary64 t)) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* 1/3 (pow t 2)))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* 2/15 (pow t 2)))))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* (pow t 2) (+ 2/15 (* 17/315 (pow t 2)))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* eh t))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* t (+ eh (* t (- (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* t (+ eh (* t (- (+ (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* t (- (* 2 (/ (* (pow eh 2) (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew)) (+ (* 2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))))) ew)) (/ (* (pow eh 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))))) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* t (+ eh (* t (- (+ (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* t (- (+ (* 2 (/ (* (pow eh 2) (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew)) (* t (- (* 2 (/ (* (pow eh 2) (+ (* 1/6 (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew))) ew)) (+ (* -2 (/ (* (pow eh 3) (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) (pow ew 2))) (+ (* 2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* 2 (/ (* (pow eh 2) (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew)) (+ (* 2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))))) ew)) (/ (* (pow eh 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))))) ew)) (/ (* eh (* (- (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew)))))) (+ (* 2 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew))))) ew)) (/ (* (pow eh 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))))) (* 2 (/ (* (pow eh 2) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) ew)))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* 1/2 ew))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* eh (* t (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))))) (* 1/2 ew)))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* 1/2 ew) (* t (+ (* -1 (* eh (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))))) (* eh (* t (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* 1/2 ew) (* t (+ (* -1 (* eh (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))))) (* t (+ (* eh (* t (+ (* 1/6 (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew)))) (* eh (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))))))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* 1/2 (/ ew eh)))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* -1 (* t (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))))) (* 1/2 (/ ew eh))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* 1/2 (/ ew eh)) (* t (+ (* -1 (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) (* t (+ (* -1/12 (/ ew eh)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (+ (* 1/2 (/ ew eh)) (* t (+ (* -1 (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) (* t (+ (* -1/12 (/ ew eh)) (+ (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* t (+ (* 1/6 (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew))))))))))) |
#s(approx (sin t) #s(hole binary64 t)) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* -1/6 (pow t 2)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* 1/120 (pow t 2)) 1/6)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/120 (* -1/5040 (pow t 2)))) 1/6)))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* 1/2 (/ ew (* eh t))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* -1 (* t (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))))) (* 1/2 (/ ew eh))) t))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* t (- (* 1/2 (* t (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))))) t))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* t (- (* t (+ (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (/ (* eh (* t (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew))) (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))))) t))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* 1/2 (/ ew (* eh t))))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (/ (+ (* 1/2 (* (pow t 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) (* 1/2 (/ ew eh))) t))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* (pow t 2) (+ (* 1/2 (* (pow t 2) (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))) t))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* (pow t 2) (+ (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* (pow t 2) (+ (* 1/2 (* (pow t 2) (- (* -1/720 (/ ew eh)) (+ (* -1/6 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) (+ (* -1/5040 (/ ew eh)) (* 1/120 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))))) (* 1/2 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))))))) t))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ ew eh))) (+ (* -1 (log t)) (/ (* eh (* (pow t 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ ew eh))) (+ (* -1 (log t)) (* (pow t 2) (+ (* 1/24 (* (pow t 2) (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew))))) (/ (* eh (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (+ (log (* 1/2 (/ ew eh))) (+ (* -1 (log t)) (* (pow t 2) (+ (* (pow t 2) (+ (* 1/720 (* (pow t 2) (+ (* -720 (/ (* (pow eh 2) (* (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))) (pow ew 2))) (+ (* 240 (/ (* (pow eh 3) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 3)) (pow ew 3))) (* 720 (/ (* eh (- (* -1/720 (/ ew eh)) (+ (* -1/6 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) (+ (* -1/5040 (/ ew eh)) (* 1/120 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))))) ew)))))) (* 1/24 (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew)))))) (/ (* eh (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))))))) |
#s(approx (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) #s(hole binary64 (* 1/2 (/ ew (* eh t))))) |
#s(approx (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) #s(hole binary64 (/ (+ (* 1/2 (* (pow t 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) (* 1/2 (/ ew eh))) t))) |
#s(approx (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* (pow t 2) (+ (* 1/2 (* (pow t 2) (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))) t))) |
#s(approx (* ew (* 1/2 (/ (cos t) (* eh (sin t))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* (pow t 2) (+ (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* (pow t 2) (+ (* 1/2 (* (pow t 2) (- (* -1/720 (/ ew eh)) (+ (* -1/6 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) (+ (* -1/5040 (/ ew eh)) (* 1/120 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))))) (* 1/2 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))))))) t))) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) #s(hole binary64 (/ 1/2 (* eh t)))) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) #s(hole binary64 (/ (+ (* -1/6 (/ (pow t 2) eh)) (* 1/2 (/ 1 eh))) t))) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* -1/90 (/ (pow t 2) eh)) (* 1/6 (/ 1 eh)))) (* 1/2 (/ 1 eh))) t))) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* (pow t 2) (- (* -1/945 (/ (pow t 2) eh)) (* 1/90 (/ 1 eh)))) (* 1/6 (/ 1 eh)))) (* 1/2 (/ 1 eh))) t))) |
#s(approx (/ (cos t) (* eh (sin t))) #s(hole binary64 (/ 1 (* eh t)))) |
#s(approx (/ (cos t) (* eh (sin t))) #s(hole binary64 (/ (+ (* -1/3 (/ (pow t 2) eh)) (/ 1 eh)) t))) |
#s(approx (/ (cos t) (* eh (sin t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* -1/45 (/ (pow t 2) eh)) (* 1/3 (/ 1 eh)))) (/ 1 eh)) t))) |
#s(approx (/ (cos t) (* eh (sin t))) #s(hole binary64 (/ (+ (* (pow t 2) (- (* (pow t 2) (- (* -2/945 (/ (pow t 2) eh)) (* 1/45 (/ 1 eh)))) (* 1/3 (/ 1 eh)))) (/ 1 eh)) t))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* eh t))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* -1/6 (* eh (pow t 2))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* 1/120 (* eh (pow t 2))))))))) |
#s(approx (* eh (sin t)) #s(hole binary64 (* t (+ eh (* (pow t 2) (+ (* -1/6 eh) (* (pow t 2) (+ (* -1/5040 (* eh (pow t 2))) (* 1/120 eh))))))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (+ (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (* -1 (/ (* eh (* (pow t 2) (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (+ (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (* (pow t 2) (+ (* -1 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew)) (* (pow t 2) (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (+ (* -1/24 (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew)))) (* 1/2 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))))))))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (+ (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (* (pow t 2) (+ (* -1 (/ (* eh (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew)) (* (pow t 2) (+ (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (+ (* -1/24 (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew)))) (* 1/2 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))))) (* (pow t 2) (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (+ (* -1/6 (/ (* (pow eh 3) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 3)) (pow ew 3))) (+ (* -1/720 (+ (* -720 (/ (* (pow eh 2) (* (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))) (pow ew 2))) (+ (* 240 (/ (* (pow eh 3) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 3)) (pow ew 3))) (* 720 (/ (* eh (- (* -1/720 (/ ew eh)) (+ (* -1/6 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) (+ (* -1/5040 (/ ew eh)) (* 1/120 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))))) ew))))) (* 1/24 (/ (* eh (* (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew))))))))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (- (* -1 (/ (* eh (* (pow t 2) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))) ew)) (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (- (* (pow t 2) (- (* -1/24 (* (pow t 2) (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew))))) (/ (* eh (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))) (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (- (* (pow t 2) (- (* (pow t 2) (- (* -1/720 (* (pow t 2) (+ (* -720 (/ (* (pow eh 2) (* (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh)))))) (pow ew 2))) (+ (* 240 (/ (* (pow eh 3) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 3)) (pow ew 3))) (* 720 (/ (* eh (- (* -1/720 (/ ew eh)) (+ (* -1/6 (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) (+ (* -1/5040 (/ ew eh)) (* 1/120 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))))) ew)))))) (* 1/24 (+ (* -12 (/ (* (pow eh 2) (pow (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))) 2)) (pow ew 2))) (* 24 (/ (* eh (- (* 1/24 (/ ew eh)) (+ (* -1/6 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) (* 1/120 (/ ew eh))))) ew)))))) (/ (* eh (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))) ew))) (+ (log (* 1/2 (/ ew eh))) (* -1 (log t)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (* 1/2 (/ ew (* eh t))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* t (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))))) t))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* t (+ (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (* 1/2 (* t (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))))) t))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (/ (+ (* 1/2 (/ ew eh)) (* t (+ (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (* t (+ (* -1 (/ (* eh (* t (* (exp (neg (+ (log (* 1/2 (/ ew eh))) (* -1 (log t))))) (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh)))))) ew)) (* 1/2 (- (* -1/2 (/ ew eh)) (* -1/6 (/ ew eh))))))))) t))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) ew))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* t (+ (* 1/2 (/ (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) ew)) (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow t 2) (- (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow t 2) (- (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow t 2) (- (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (+ (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (+ (* 1/24 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3)))))))) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* 1/2 (/ (* eh (* (pow t 2) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (+ (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3))))))) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (+ (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (+ (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (* t (- (* 1/2 (/ (* eh (- (+ (* -2/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (+ (* -1/6 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (/ (* eh (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) ew)))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3))))))) (+ (* -1/4 (/ (* eh (* (+ (* -1/3 (/ eh ew)) (+ (* 1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)) (* 1/2 (/ (* (pow eh 2) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))) (pow ew 2)))))))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3))))))) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* 1/2 (* (pow t 2) (- (* -1 (/ eh ew)) (/ eh ew)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (- (* -1 (/ eh ew)) (/ eh ew))) (* t (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (- (* -1 (/ eh ew)) (/ eh ew))) (* t (- (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* t (- (* 1/2 (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew))))))) (* 1/4 (/ (* (pow eh 2) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 2))))))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (- (* -1 (/ eh ew)) (/ eh ew))) (* t (- (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* t (- (+ (* 1/2 (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (* t (- (* 1/2 (- (+ (* -2/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (+ (* -1/6 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (/ (* eh (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) ew)))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew))))))) (* 1/4 (/ (* (pow eh 2) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 2))))))) (+ (* -1/4 (* (+ (* -1/3 (/ eh ew)) (+ (* 1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (- (* -1 (/ eh ew)) (/ eh ew)))) (* 1/2 (/ (* (pow eh 2) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))) (pow ew 2)))))))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew))))))) (* 1/4 (/ (* (pow eh 2) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 2))))))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (- (* -1 (/ eh ew)) (/ eh ew))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (/ eh ew)) (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))))) (/ eh ew))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (/ eh ew)) (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* t (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (/ (pow eh 2) (pow ew 2)))))) (/ eh ew))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (- (+ (* -1 (/ eh ew)) (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* t (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (+ (* t (- (+ (* -2/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (+ (* -1/6 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (/ (* eh (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) ew)))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))) (* 1/3 (/ eh ew)))) (/ (pow eh 2) (pow ew 2)))))) (/ eh ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (- (* -1 (/ eh ew)) (/ eh ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (- (+ (* -1 (/ eh ew)) (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2))))) (/ eh ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (- (+ (* -1 (/ eh ew)) (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* t (- (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))) (* 1/3 (/ eh ew)))) (/ (pow eh 2) (pow ew 2)))))) (/ eh ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (* t (- (+ (* -1 (/ eh ew)) (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* t (- (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (+ (* t (- (+ (* -2/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (/ (* eh (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) ew))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (/ (pow eh 2) (pow ew 2)))))) (/ eh ew))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (* 1/2 (/ (* (pow eh 2) (pow t 2)) (pow ew 2)))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* 1/2 (* (pow t 2) (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* 1/2 (/ (pow eh 2) (pow ew 2))) (* (pow t 2) (+ (* 1/2 (* (pow t 2) (- (* 2/45 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (+ (* 1/3 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (* (pow eh 2) (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) (pow ew 2)))))))) (* 1/2 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4))))))))))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (+ 1 (/ (* (pow eh 2) (pow t 2)) (pow ew 2))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* (pow t 2) (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (/ (pow eh 2) (pow ew 2))))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(hole binary64 (+ 1 (* (pow t 2) (+ (* (pow t 2) (- (+ (* -1/3 (/ (pow eh 2) (pow ew 2))) (* (pow t 2) (- (* 2/45 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (* 1/3 (/ (pow eh 2) (pow ew 2))))))) (* -1 (/ (pow eh 2) (pow ew 2))))) (/ (pow eh 2) (pow ew 2))))))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) #s(hole binary64 (/ (* (pow eh 2) (pow t 2)) (pow ew 2)))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) #s(hole binary64 (* (pow t 2) (+ (* (pow t 2) (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (/ (pow eh 2) (pow ew 2)))))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) #s(hole binary64 (* (pow t 2) (+ (* (pow t 2) (- (+ (* -1/3 (/ (pow eh 2) (pow ew 2))) (* (pow t 2) (- (* 2/45 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (* 1/3 (/ (pow eh 2) (pow ew 2))))))) (* -1 (/ (pow eh 2) (pow ew 2))))) (/ (pow eh 2) (pow ew 2)))))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) #s(hole binary64 (* (pow t 2) (+ (* (pow t 2) (- (+ (* -1/3 (/ (pow eh 2) (pow ew 2))) (* (pow t 2) (- (+ (* 2/45 (/ (pow eh 2) (pow ew 2))) (* (pow t 2) (- (* -1/315 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (- (* 2/45 (/ (pow eh 2) (pow ew 2))) (+ (* -1 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (* 1/3 (/ (pow eh 2) (pow ew 2)))))) (+ (* -2/45 (/ (pow eh 2) (pow ew 2))) (* 1/3 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2)))))))))) (+ (* -1 (- (* -1/3 (/ (pow eh 2) (pow ew 2))) (* -1 (/ (pow eh 2) (pow ew 2))))) (* 1/3 (/ (pow eh 2) (pow ew 2))))))) (* -1 (/ (pow eh 2) (pow ew 2))))) (/ (pow eh 2) (pow ew 2)))))) |
#s(approx (pow (* eh (sin t)) 2) #s(hole binary64 (* (pow eh 2) (pow t 2)))) |
#s(approx (pow (* eh (sin t)) 2) #s(hole binary64 (* (pow t 2) (+ (* -1/3 (* (pow eh 2) (pow t 2))) (pow eh 2))))) |
#s(approx (pow (* eh (sin t)) 2) #s(hole binary64 (* (pow t 2) (+ (* (pow t 2) (+ (* -1/3 (pow eh 2)) (* 2/45 (* (pow eh 2) (pow t 2))))) (pow eh 2))))) |
#s(approx (pow (* eh (sin t)) 2) #s(hole binary64 (* (pow t 2) (+ (* (pow t 2) (+ (* -1/3 (pow eh 2)) (* (pow t 2) (+ (* -1/315 (* (pow eh 2) (pow t 2))) (* 2/45 (pow eh 2)))))) (pow eh 2))))) |
#s(approx (pow (* ew (cos t)) 2) #s(hole binary64 (pow ew 2))) |
#s(approx (pow (* ew (cos t)) 2) #s(hole binary64 (+ (* -1 (* (pow ew 2) (pow t 2))) (pow ew 2)))) |
#s(approx (pow (* ew (cos t)) 2) #s(hole binary64 (+ (* (pow t 2) (+ (* -1 (pow ew 2)) (* 1/3 (* (pow ew 2) (pow t 2))))) (pow ew 2)))) |
#s(approx (pow (* ew (cos t)) 2) #s(hole binary64 (+ (* (pow t 2) (+ (* -1 (pow ew 2)) (* (pow t 2) (+ (* -2/45 (* (pow ew 2) (pow t 2))) (* 1/3 (pow ew 2)))))) (pow ew 2)))) |
#s(approx (* ew (cos t)) #s(hole binary64 ew)) |
#s(approx (* ew (cos t)) #s(hole binary64 (+ ew (* -1/2 (* ew (pow t 2)))))) |
#s(approx (* ew (cos t)) #s(hole binary64 (+ ew (* (pow t 2) (+ (* -1/2 ew) (* 1/24 (* ew (pow t 2)))))))) |
#s(approx (* ew (cos t)) #s(hole binary64 (+ ew (* (pow t 2) (+ (* -1/2 ew) (* (pow t 2) (+ (* -1/720 (* ew (pow t 2))) (* 1/24 ew)))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* t (- (/ eh ew) (* -1 (/ eh ew))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* t (- (+ (* -1 (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (/ eh ew)) (* -1 (/ eh ew))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* t (- (+ (* t (- (* t (- (* 1/3 (/ eh ew)) (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (/ eh ew)) (* -1 (/ eh ew))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (/ (* eh t) ew)))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (* t (- (* -1 (* t (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (* -1 (/ eh ew))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (+ 1 (* t (- (* t (- (* -1 (* t (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) (* -1 (/ eh ew))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* -1 (/ (* eh t) ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* t (- (* 1/2 (/ (* (pow eh 2) t) (pow ew 2))) (/ eh ew)))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 1 (* t (- (* t (+ (* -1/3 (/ (* eh t) ew)) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (/ eh ew)))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* -1 (* t (+ (* -1 (/ eh ew)) (/ eh ew))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* t (- (/ (* (pow eh 2) t) (pow ew 2)) (+ (* -1 (/ eh ew)) (/ eh ew))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (+ 2 (* t (- (* t (- (* -1 (* t (+ (* -1/3 (/ eh ew)) (+ (* 1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))))) (* -1 (/ (pow eh 2) (pow ew 2))))) (+ (* -1 (/ eh ew)) (/ eh ew))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (/ (* eh t) ew)))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (* t (- (/ (* (pow eh 2) t) (pow ew 2)) (* -1 (/ eh ew))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ 2 (* t (- (* t (- (* -1 (* t (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))) (* -1 (/ (pow eh 2) (pow ew 2))))) (* -1 (/ eh ew))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* eh (* (pow t 2) (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew))))) (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* eh (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* eh (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew)))) (* t (+ (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* eh (* t (- (+ (* -1/2 (/ (pow eh 3) (pow ew 3))) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (+ (* -1/2 (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (+ (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* t (- (* t (- (+ (* -1/2 (/ (pow eh 3) (pow ew 3))) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))))) (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (+ (* ew (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2))))) (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (+ (* (pow t 2) (+ (* ew (* (pow t 2) (- (+ (* -1/3 (/ eh (pow ew 2))) (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 (/ eh (pow ew 2)))))) (* ew (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2)))))) (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (+ (* (pow t 2) (+ (* ew (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2)))) (* (pow t 2) (+ (* ew (* (pow t 2) (- (+ (* -1/720 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 2/45 (/ eh (pow ew 2)))) (+ (* -1/2 (- (* -1/3 (/ eh (pow ew 2))) (* -1/2 (/ eh (pow ew 2))))) (* 1/24 (/ eh (pow ew 2))))))) (* ew (- (+ (* -1/3 (/ eh (pow ew 2))) (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 (/ eh (pow ew 2))))))))) (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2)))) (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (+ (* (pow t 2) (- (+ (* -1/3 (/ eh (pow ew 2))) (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 (/ eh (pow ew 2))))) (/ eh (pow ew 2))))) (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (+ (* (pow t 2) (- (+ (* -1/3 (/ eh (pow ew 2))) (+ (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (- (+ (* -1/720 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 2/45 (/ eh (pow ew 2)))) (+ (* -1/2 (- (* -1/3 (/ eh (pow ew 2))) (* -1/2 (/ eh (pow ew 2))))) (* 1/24 (/ eh (pow ew 2)))))))) (* -1/2 (/ eh (pow ew 2))))) (/ eh (pow ew 2))))) (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (pow (sin t) 2) (cos t)) #s(hole binary64 (pow t 2))) |
#s(approx (/ (pow (sin t) 2) (cos t)) #s(hole binary64 (* (pow t 2) (+ 1 (* 1/6 (pow t 2)))))) |
#s(approx (/ (pow (sin t) 2) (cos t)) #s(hole binary64 (* (pow t 2) (+ 1 (* (pow t 2) (+ 1/6 (* 31/360 (pow t 2)))))))) |
#s(approx (/ (pow (sin t) 2) (cos t)) #s(hole binary64 (* (pow t 2) (+ 1 (* (pow t 2) (+ 1/6 (* (pow t 2) (+ 31/360 (* 173/5040 (pow t 2)))))))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (pow t 2))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (* (pow t 2) (+ 1 (* -1/3 (pow t 2)))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (* (pow t 2) (+ 1 (* (pow t 2) (- (* 2/45 (pow t 2)) 1/3)))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (* (pow t 2) (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 2/45 (* -1/315 (pow t 2)))) 1/3)))))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* -1/2 (/ (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 1/24 (/ (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (+ (* -1/720 (/ (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))))) (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))))))) (+ (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))))) |
#s(approx (cos t) #s(hole binary64 (cos t))) |
#s(approx (tan t) #s(hole binary64 (/ (sin t) (cos t)))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (/ (* eh (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))))))) (+ (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) #s(hole binary64 (* eh (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))))))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) #s(hole binary64 (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))))))) |
#s(approx (sin t) #s(hole binary64 (sin t))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (- (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))) (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) #s(hole binary64 (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) #s(hole binary64 (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) #s(hole binary64 (* -1 (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t)))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) #s(hole binary64 (+ (exp (neg (log (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) (* 1/2 (/ (* ew (cos t)) (* eh (sin t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(hole binary64 (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(hole binary64 (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(hole binary64 (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(hole binary64 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(hole binary64 (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(hole binary64 (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (/ (pow (sin t) 2) (cos t)) #s(hole binary64 (/ (pow (sin t) 2) (cos t)))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (pow (sin t) 2))) |
| Outputs |
|---|
(sqrt.f64 (*.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
(fabs.f64 (neg.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) |
(neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (-.f64 (*.f64 (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) |
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) |
#s(literal -1 binary64) |
(*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
ew |
(*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(/.f64 (+.f64 (cos.f64 (+.f64 t (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (cos.f64 (-.f64 t (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) #s(literal 2 binary64)) |
(sin.f64 (+.f64 t (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 t)) |
(cos.f64 t) |
t |
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
(sin.f64 (+.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(*.f64 (/.f64 eh ew) (tan.f64 t)) |
(/.f64 (neg.f64 (*.f64 eh (sin.f64 t))) (neg.f64 (*.f64 ew (cos.f64 t)))) |
(/.f64 (*.f64 eh (sin.f64 t)) (*.f64 ew (cos.f64 t))) |
(/.f64 (neg.f64 eh) (neg.f64 ew)) |
(/.f64 eh ew) |
eh |
(/.f64 (neg.f64 (sin.f64 t)) (neg.f64 (cos.f64 t))) |
(/.f64 (sin.f64 t) (cos.f64 t)) |
(tan.f64 (+.f64 t (PI.f64))) |
(tan.f64 t) |
(/.f64 (neg.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) |
(/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) |
(*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) |
(*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) |
(sin.f64 t) |
(*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) |
(-.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64))) |
(*.f64 (exp.f64 (log.f64 ew)) (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
(*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) |
(exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
(+.f64 (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) |
(/.f64 (+.f64 (pow.f64 (log.f64 ew) #s(literal 3 binary64)) (pow.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal 3 binary64))) (fma.f64 (log.f64 ew) (log.f64 ew) (-.f64 (*.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (*.f64 (log.f64 ew) (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) |
(+.f64 (log.f64 ew) (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) |
(log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) |
(*.f64 (exp.f64 (log.f64 ew)) (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
(*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) |
(exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
(+.f64 (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) |
(*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) |
#s(literal 1/2 binary64) |
(/.f64 (neg.f64 (cos.f64 t)) (neg.f64 (*.f64 eh (sin.f64 t)))) |
(/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) |
(*.f64 eh (sin.f64 t)) |
(pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) |
(/.f64 #s(literal 1 binary64) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
(-.f64 (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) |
(exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) |
(+.f64 (cosh.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (sinh.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) |
(neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
(log.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64))) |
(*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) |
(/.f64 (+.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (-.f64 (pow.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))))) |
(fma.f64 (exp.f64 (log.f64 ew)) (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64))) |
(fma.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64))) |
(+.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64))) |
(sqrt.f64 (*.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew))) #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew))))) |
(fabs.f64 (neg.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew))))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew))) |
(neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew)) |
(*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
(-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(/.f64 (neg.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (neg.f64 (*.f64 ew (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 ew (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(/.f64 (neg.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (neg.f64 (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(pow.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) |
(sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) |
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) |
(+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) |
#s(literal 1 binary64) |
(*.f64 (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) |
(/.f64 (neg.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) (neg.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) |
(/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) |
(*.f64 (*.f64 eh eh) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) |
(*.f64 (*.f64 eh (sin.f64 t)) (*.f64 eh (sin.f64 t))) |
(pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 eh (sin.f64 t))) #s(literal 2 binary64))) |
#s(literal 2 binary64) |
(*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) |
(*.f64 (*.f64 ew (cos.f64 t)) (*.f64 ew (cos.f64 t))) |
(pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (*.f64 ew (cos.f64 t))) #s(literal 2 binary64))) |
(*.f64 ew (cos.f64 t)) |
(/.f64 (+.f64 (pow.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (-.f64 (*.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)) (*.f64 (/.f64 eh ew) (tan.f64 t))) (*.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(/.f64 (fma.f64 #s(literal 1 binary64) (*.f64 ew (cos.f64 t)) (*.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) (*.f64 eh (sin.f64 t)))) (*.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) (*.f64 ew (cos.f64 t)))) |
(+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) |
(/.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(exp.f64 (*.f64 (log.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t)))) #s(literal -1 binary64))) |
(-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) #s(literal 3 binary64))) (fma.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (-.f64 (*.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)))))) |
(+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) |
(sqrt.f64 (*.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) eh)) #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) eh)))) |
(fabs.f64 (neg.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) eh)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) eh))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) eh)) |
(*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) eh) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) |
(*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) #s(literal 3 binary64))) (fma.f64 (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) (-.f64 (*.f64 (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) (*.f64 (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))))) |
(/.f64 (fma.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) eh (*.f64 (*.f64 (*.f64 ew ew) (cos.f64 t)) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 (*.f64 (*.f64 ew ew) (cos.f64 t)) eh)) |
(fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) |
(+.f64 (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) |
(/.f64 (neg.f64 eh) (neg.f64 (*.f64 ew ew))) |
(/.f64 eh (*.f64 ew ew)) |
(*.f64 (neg.f64 ew) (neg.f64 ew)) |
(*.f64 (fabs.f64 ew) (fabs.f64 ew)) |
(*.f64 ew ew) |
(pow.f64 ew #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 ew) #s(literal 2 binary64))) |
(/.f64 (neg.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (neg.f64 (cos.f64 t))) |
(/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) |
(*.f64 (sin.f64 t) (sin.f64 t)) |
(pow.f64 (sin.f64 t) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (sin.f64 t)) #s(literal 2 binary64))) |
(/.f64 (neg.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (neg.f64 eh)) |
(/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) |
#s(approx (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (fabs.f64 (-.f64 (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 eh (sin.f64 t)))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 eh (+.f64 (sin.f64 t) (*.f64 eh (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 eh (+.f64 (sin.f64 t) (*.f64 eh (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))))) (cos.f64 t))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (cos (neg (atan (* (/ eh ew) (tan t))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (neg (atan (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (atan (* (/ eh ew) (tan t))) (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (* (/ eh ew) (tan t)) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
#s(approx (/ eh ew) (/.f64 eh ew)) |
#s(approx eh eh) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 eh (sin.f64 t))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 eh (+.f64 (sin.f64 t) (*.f64 eh (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 eh (+.f64 (sin.f64 t) (*.f64 eh (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))))) (cos.f64 t))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 eh (+.f64 (sin.f64 t) (*.f64 eh (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) (*.f64 eh (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 eh (*.f64 (pow.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))))) (cos.f64 t))))))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 ew (cos.f64 t)))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 ew (cos.f64 t))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) eh))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 ew (cos.f64 t)))) eh)) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) eh)) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t))))) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) |
#s(approx (/ (cos t) (* eh (sin t))) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) |
#s(approx (* eh (sin t)) (*.f64 eh (sin.f64 t))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (*.f64 #s(literal -1 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 eh (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) eh)) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) ew)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) ew) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))) ew))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) ew) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) ew) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t))))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) ew) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) ew) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t))))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) ew) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t))))) ew) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))) (cos.f64 t)))))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t))))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t))))) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))) (cos.f64 t))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 eh (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 eh (fma.f64 eh (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 eh (fma.f64 eh (fma.f64 eh (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))) (cos.f64 t)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))) (cos.f64 t))))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) #s(literal 1 binary64)) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 eh eh) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 eh eh) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)))))))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) #s(literal 1 binary64)) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) |
#s(approx (pow (* eh (sin t)) 2) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) #s(literal 1 binary64)) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 eh (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 eh (-.f64 (fma.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) #s(literal 1 binary64)) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (+.f64 #s(literal 1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (+.f64 #s(literal 1 binary64) (*.f64 eh (-.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) #s(literal 1 binary64)) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 eh (-.f64 (*.f64 eh (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 eh eh) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) #s(literal 2 binary64)) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+.f64 #s(literal 2 binary64) (*.f64 eh (-.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+.f64 #s(literal 2 binary64) (*.f64 eh (-.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) #s(literal 2 binary64)) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (+.f64 #s(literal 2 binary64) (*.f64 eh (-.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (+.f64 #s(literal 2 binary64) (*.f64 eh (-.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 eh eh) (fma.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))) eh)) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) eh)) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 eh eh) (-.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) eh)) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))) eh)) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (/.f64 (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))) eh)) |
#s(approx (/ eh (* ew ew)) (/.f64 eh (*.f64 ew ew))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 eh (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 eh (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (sin.f64 t)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 eh #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (pow.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (sin.f64 t))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 t) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (sin.f64 t)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 t) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 eh #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (pow.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (sin.f64 t))))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (sin.f64 t))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) eh))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (sin.f64 t)))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) eh)))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (*.f64 #s(literal -1 binary64) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (*.f64 #s(literal -1 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (+.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 eh (-.f64 (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))) ew))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 eh (-.f64 (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))) ew) (*.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) ew)))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))))) (pow.f64 eh #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 ew #s(literal 3 binary64)) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))))) (pow.f64 eh #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 ew #s(literal 3 binary64)) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (cos.f64 t))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 eh #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))))) (pow.f64 eh #s(literal 4 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 ew #s(literal 4 binary64)) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 ew #s(literal 3 binary64)) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 ew #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (sin.f64 t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (cos.f64 t))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (pow.f64 eh #s(literal 6 binary64)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 t) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 eh eh)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 eh eh))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 eh eh)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 eh #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 eh eh)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (cos.f64 t))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 eh #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 eh eh)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 eh #s(literal 4 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 eh eh)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 ew #s(literal 4 binary64)) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (sin.f64 t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (cos.f64 t))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 eh #s(literal 6 binary64))))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 eh ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))))) (pow.f64 eh #s(literal 4 binary64))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (cos.f64 t))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 eh #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))))) (pow.f64 eh #s(literal 4 binary64)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -2 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 eh (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (*.f64 ew (cos.f64 t)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (*.f64 eh (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (*.f64 eh (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) (*.f64 (*.f64 eh eh) (+.f64 (pow.f64 eh #s(literal -2 binary64)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (*.f64 eh (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))) (pow.f64 eh #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (cos.f64 t))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (pow.f64 eh #s(literal 6 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))) (pow.f64 eh #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (cos.f64 t))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (pow.f64 eh #s(literal 6 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) eh)) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) eh)) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64)))))) (sin.f64 t))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (*.f64 eh eh) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) eh)) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (cos.f64 t))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))) (pow.f64 eh #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (*.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (*.f64 eh (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (*.f64 eh (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (cos.f64 t))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))) (pow.f64 eh #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (fma.f64 #s(literal 2 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (fma.f64 (exp.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (exp.f64 (neg.f64 (log.f64 eh))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (*.f64 (/.f64 eh ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (*.f64 eh (+.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 eh eh)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (*.f64 eh (+.f64 (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 eh eh)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh)) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh)) eh)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh)))) eh))) eh)))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (+.f64 (sin.f64 t) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh)))))))))) eh)))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (+.f64 (sin.f64 t) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))))) (*.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))) (sin.f64 t))))))) eh)))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (+.f64 (sin.f64 t) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh)))))) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))))) (sin.f64 t))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) eh) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))))) (pow.f64 (*.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))) (sin.f64 t)) #s(literal 2 binary64)))))) eh)))) eh)))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (+.f64 (sin.f64 t) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (cos.f64 t) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh)))))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (+.f64 (sin.f64 t) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))))) (*.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))) (sin.f64 t)))))) eh)))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (+.f64 (sin.f64 t) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh)))))) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))))) (sin.f64 t))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) eh) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))))) (pow.f64 (*.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))) (sin.f64 t)) #s(literal 2 binary64)))))) eh))) eh)))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))) (sin.f64 t))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) eh) (*.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))) (sin.f64 t)))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))) (sin.f64 t)))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) eh)))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (*.f64 #s(literal -1 binary64) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh)))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh)))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (*.f64 #s(literal -1 binary64) (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (+.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (/.f64 #s(literal -1 binary64) eh))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 t) eh) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) ew)) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) ew))) eh)) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (/.f64 (*.f64 eh (sin.f64 t)) ew)) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 t) eh) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (/.f64 (sin.f64 t) eh) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 eh eh)))) eh)) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (*.f64 eh (sin.f64 t)) ew)) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 eh eh))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (pow.f64 eh #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 eh eh)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (-.f64 (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (pow.f64 eh #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (pow.f64 eh #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 eh eh))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (sin.f64 t)) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (-.f64 (+.f64 (sin.f64 t) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (-.f64 (+.f64 (sin.f64 t) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (fma.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (-.f64 (+.f64 (sin.f64 t) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (fma.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 eh eh)))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 eh eh))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64))))))) (pow.f64 eh #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 eh eh)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (pow.f64 (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal -1 binary64))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (pow.f64 (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal -1 binary64))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (pow.f64 (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal -1 binary64))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (pow.f64 (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal -1 binary64)))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))) (pow.f64 (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal -1 binary64))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (pow.f64 eh #s(literal 6 binary64))) (pow.f64 (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (/.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) eh))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (pow.f64 eh #s(literal 4 binary64))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) eh))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 5 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (pow.f64 eh #s(literal 6 binary64))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))))) eh))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (+.f64 (pow.f64 (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal -1 binary64)) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (+.f64 (pow.f64 (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal -1 binary64)) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (+.f64 (pow.f64 (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal -1 binary64)) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (+.f64 (pow.f64 (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal -1 binary64)) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (+.f64 (pow.f64 (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal -1 binary64)) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 (*.f64 eh eh) (sin.f64 t))) (+.f64 (pow.f64 (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal -1 binary64)) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh))) eh) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh)) eh)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh))) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))))) eh))) eh)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 eh eh)) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 eh eh)) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (-.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 ew (-.f64 (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (/.f64 (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 ew (fma.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))))) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (/.f64 (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))))) (*.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) (sin.f64 t)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64))) (*.f64 ew (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))))) (pow.f64 (*.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) (sin.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) (sin.f64 t))))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))))))) |
#s(approx ew ew) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 ew (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 ew (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 ew eh) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))))) (*.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) (sin.f64 t)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 ew (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64))) (*.f64 ew (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 ew (*.f64 eh eh)) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))))) (pow.f64 (*.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) (sin.f64 t)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64))))) (*.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) (sin.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) (sin.f64 t))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 ew (cos.f64 t))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) (sin.f64 t)))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) eh)))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (*.f64 #s(literal -1 binary64) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (*.f64 #s(literal -1 binary64) (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (+.f64 (pow.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) #s(literal -1 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) ew)) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (/.f64 (fma.f64 ew (-.f64 (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) ew)) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (/.f64 (fma.f64 ew (-.f64 (*.f64 ew (fma.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))))) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (/.f64 (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) ew)) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 ew (-.f64 (*.f64 ew (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 ew (-.f64 (*.f64 ew (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (sin.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) ew)) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (sin.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) ew)) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (sin.f64 t)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (sin.f64 t))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (sin.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) ew)) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (fma.f64 #s(literal -1 binary64) (sin.f64 t) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (fma.f64 #s(literal -1 binary64) (sin.f64 t) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) eh)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))) (sin.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (fma.f64 #s(literal -1 binary64) (sin.f64 t) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) eh) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))))))) eh)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) eh)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))) (sin.f64 t))))))) (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))))) eh))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))) (sin.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) ew)) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (*.f64 (*.f64 ew ew) (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))))))) ew)) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (*.f64 (*.f64 ew ew) (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (*.f64 ew ew) (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))) (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))))))))))))) ew)) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (/.f64 (-.f64 (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (/.f64 (-.f64 (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (/.f64 (-.f64 (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))))))))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 t)) (*.f64 eh (sin.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (/.f64 (fma.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (/.f64 (fma.f64 (*.f64 ew ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 5 binary64))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 5 binary64))))))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) (/.f64 (+.f64 (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 ew ew)) (*.f64 ew ew))) |
#s(approx (pow (* ew (cos t)) 2) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) |
#s(approx (* ew (cos t)) (*.f64 ew (cos.f64 t))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 t)) (*.f64 eh (sin.f64 t))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 (*.f64 ew ew) (-.f64 (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 t)) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) ew)) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) ew)) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (*.f64 ew (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (*.f64 ew (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 5 binary64))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 5 binary64))))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (*.f64 ew (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 ew ew) eh) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)))))) (sin.f64 t))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 5 binary64))))))))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) ew)) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) ew)) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) ew)) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (/.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 ew ew) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (*.f64 ew (fma.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (/.f64 (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (/.f64 (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (*.f64 ew (fma.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (/.f64 (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (/.f64 (*.f64 (sin.f64 t) (*.f64 #s(literal 2 binary64) (sinh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (*.f64 #s(literal 2 binary64) (cosh.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew)) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (*.f64 ew ew))) |
#s(approx (* ew ew) (*.f64 ew ew)) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (*.f64 eh (sin.f64 t)) ew)))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 ew (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (*.f64 eh (sin.f64 t)) ew))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 ew (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 eh (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))))) (cos.f64 t))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t))) (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (*.f64 eh (sin.f64 t)) ew)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 eh eh) ew) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t))) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 eh eh) ew) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))))) (cos.f64 t))) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 eh eh) ew) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t))) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 eh eh) ew) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (*.f64 eh eh) ew) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t))) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 eh eh) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 eh (sin.f64 t)))) (fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))))) (cos.f64 t))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 eh eh) ew) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (sin.f64 t))) ew) (*.f64 #s(literal 1/2 binary64) (cos.f64 t))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) (sin.f64 t)) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) eh))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (*.f64 #s(literal -1 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (*.f64 ew (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 ew)))))) ew)))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (*.f64 ew ew))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (*.f64 ew ew)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))))) (pow.f64 ew #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (*.f64 ew ew))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 ew #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (*.f64 ew ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) ew))) (*.f64 ew ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))))) (*.f64 ew ew))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) ew) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))))) (cos.f64 t)))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))))) (*.f64 ew ew)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) ew) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 eh eh) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))))) (*.f64 ew ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) ew))) ew)) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))) (*.f64 ew ew))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) ew) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) ew)) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))))) (cos.f64 t))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))) (*.f64 ew ew)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) ew) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 eh eh) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))))) ew)) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew)) ew)) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))) (*.f64 ew ew)))) ew)) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (+.f64 (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))))) (cos.f64 t))))) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))) (*.f64 ew ew))))) ew)) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))) (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (*.f64 eh eh) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 ew #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))) (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 (/.f64 eh (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))) (cos.f64 t)) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) (*.f64 ew ew)) (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t)))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) (*.f64 ew ew)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))) (pow.f64 ew #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (-.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (-.f64 (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (-.f64 (+.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (-.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))) (pow.f64 ew #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (-.f64 (+.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (-.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))) (pow.f64 ew #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) (pow.f64 ew #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64)))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64)))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))) (pow.f64 ew #s(literal 3 binary64)))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))) ew) (*.f64 eh (sin.f64 t))) ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))))) (cos.f64 t))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))) ew) (*.f64 eh (sin.f64 t))) ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))) ew) (*.f64 eh (sin.f64 t)))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))))) (cos.f64 t))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))) ew) (*.f64 eh (sin.f64 t)))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 eh eh) ew) (/.f64 (*.f64 (pow.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t))))))) (cos.f64 t)))) ew) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (cos.f64 t)))) ew) (*.f64 eh (sin.f64 t)))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1/2 binary64) (cos.f64 t) (/.f64 (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (sin.f64 t))) ew))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) (sin.f64 t)) ew))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) ew))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (*.f64 #s(literal -1 binary64) (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) ew) #s(literal -1 binary64)))))) ew) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew)) (pow.f64 ew #s(literal 3 binary64))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 ew ew))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) ew) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 eh #s(literal 3 binary64)) ew) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 ew ew)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 ew ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) ew))) (*.f64 ew ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) ew) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 eh #s(literal 3 binary64)) ew) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 ew ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64)))))))) ew))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 eh eh) ew) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) ew))) ew) (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 ew ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) ew) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) ew))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))))))) ew) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) ew) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64)))))) ew) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) ew) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (*.f64 (*.f64 ew ew) (pow.f64 (cos.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew)))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (*.f64 ew (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) ew)))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew)) (pow.f64 ew #s(literal 3 binary64))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64))))) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (pow.f64 ew #s(literal 3 binary64))))) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 t (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 t (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 t (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 t (-.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 eh (*.f64 t (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))))) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 t (-.f64 (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/24 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))))) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 ew (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 ew (*.f64 t (-.f64 (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/24 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 eh t))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 t (+.f64 eh (*.f64 t (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 t (+.f64 eh (*.f64 t (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew) (fma.f64 #s(literal 1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 t (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1/12 binary64) (/.f64 ew eh) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))) ew)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew))))) ew) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) ew)))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew)))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 #s(literal 1/24 binary64) (*.f64 ew (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) |
#s(approx (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/720 binary64) (*.f64 ew (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal 1/24 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (+.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (+.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (+.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) |
#s(approx (cos t) #s(literal 1 binary64)) |
#s(approx (cos t) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 t t)))) |
#s(approx (cos t) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 t t)) #s(literal 1/2 binary64))))) |
#s(approx (cos t) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 t t)))) #s(literal 1/2 binary64))))) |
#s(approx t t) |
#s(approx (* (/ eh ew) (tan t)) (/.f64 (*.f64 eh t) ew)) |
#s(approx (* (/ eh ew) (tan t)) (*.f64 t (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew) (/.f64 eh ew)))) |
#s(approx (* (/ eh ew) (tan t)) (*.f64 t (fma.f64 (*.f64 t t) (fma.f64 #s(literal 2/15 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew))) (/.f64 eh ew)))) |
#s(approx (* (/ eh ew) (tan t)) (*.f64 t (fma.f64 (*.f64 t t) (fma.f64 #s(literal 1/3 binary64) (/.f64 eh ew) (*.f64 (*.f64 t t) (fma.f64 #s(literal 17/315 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew) (*.f64 #s(literal 2/15 binary64) (/.f64 eh ew))))) (/.f64 eh ew)))) |
#s(approx (tan t) t) |
#s(approx (tan t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 t t))))) |
#s(approx (tan t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 t t))))))) |
#s(approx (tan t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 t t))))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 eh t)) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 t (+.f64 eh (*.f64 t (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 t (+.f64 eh (*.f64 t (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew) (*.f64 t (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1/12 binary64) (/.f64 ew eh) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))) ew)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew))))) ew) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) ew))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew))))))) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 t (+.f64 eh (*.f64 t (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew) (*.f64 t (-.f64 (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1/12 binary64) (/.f64 ew eh) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))) ew) (*.f64 t (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal 1/6 binary64) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (/.f64 (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))) ew))) ew)) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))) (*.f64 ew ew)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1/12 binary64) (/.f64 ew eh) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))) ew)) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew))))) ew) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) ew))))) ew) (/.f64 (*.f64 eh (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))) ew)))))) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew))))) ew) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) ew))))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) ew))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 #s(literal 1/2 binary64) ew)) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 t (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))))) (*.f64 #s(literal 1/2 binary64) ew))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal 1/2 binary64) ew (*.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 eh (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) (*.f64 eh (*.f64 t (fma.f64 #s(literal -1/12 binary64) (/.f64 ew eh) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal 1/2 binary64) ew (*.f64 t (fma.f64 #s(literal -1 binary64) (*.f64 eh (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) (*.f64 t (fma.f64 eh (*.f64 t (fma.f64 #s(literal 1/6 binary64) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (/.f64 (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))) ew))) (*.f64 eh (fma.f64 #s(literal -1/12 binary64) (/.f64 ew eh) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))))))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 t (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh)))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 ew eh) (*.f64 t (fma.f64 #s(literal -1 binary64) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (*.f64 t (fma.f64 #s(literal -1/12 binary64) (/.f64 ew eh) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 ew eh) (*.f64 t (fma.f64 #s(literal -1 binary64) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (*.f64 t (fma.f64 #s(literal -1/12 binary64) (/.f64 ew eh) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 t (fma.f64 #s(literal 1/6 binary64) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (/.f64 (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))) ew)))))))))) |
#s(approx (sin t) t) |
#s(approx (sin t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 t t))))) |
#s(approx (sin t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 t t)) #s(literal 1/6 binary64)))))) |
#s(approx (sin t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 t t)))) #s(literal 1/6 binary64)))))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 ew (*.f64 eh t)))) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 t (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) t)) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 ew eh) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))))) t)) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 ew eh) (*.f64 t (-.f64 (*.f64 t (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (/.f64 (*.f64 eh (*.f64 t (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))) ew))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))))) t)) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 ew (*.f64 eh t)))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) t)) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 ew eh) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))))) t)) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 ew eh) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh)))) (fma.f64 #s(literal -1/5040 binary64) (/.f64 ew eh) (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh)))))))))) t)) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (fma.f64 #s(literal -1 binary64) (log.f64 t) (/.f64 (*.f64 eh (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))) ew)))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (fma.f64 #s(literal -1 binary64) (log.f64 t) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 t t) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) #s(literal 2 binary64)) (*.f64 ew ew)) (*.f64 #s(literal 24 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh))))) ew)))) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) ew)))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (fma.f64 #s(literal -1 binary64) (log.f64 t) (*.f64 (*.f64 t t) (fma.f64 (*.f64 t t) (fma.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 t t) (fma.f64 #s(literal -720 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh)))))) (*.f64 ew ew)) (fma.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) #s(literal 3 binary64)) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh)))) (fma.f64 #s(literal -1/5040 binary64) (/.f64 ew eh) (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))))) ew))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) #s(literal 2 binary64)) (*.f64 ew ew)) (*.f64 #s(literal 24 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh))))) ew))))) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) ew)))))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 ew (*.f64 eh t)))) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) t)) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 ew eh) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))))) t)) |
#s(approx (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 ew eh) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh)))) (fma.f64 #s(literal -1/5040 binary64) (/.f64 ew eh) (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh)))))))))) t)) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) (/.f64 #s(literal 1/2 binary64) (*.f64 eh t))) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) (/.f64 (fma.f64 #s(literal -1/6 binary64) (/.f64 (*.f64 t t) eh) (*.f64 #s(literal 1/2 binary64) (pow.f64 eh #s(literal -1 binary64)))) t)) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) (/.f64 (fma.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/90 binary64) (/.f64 (*.f64 t t) eh)) (*.f64 #s(literal 1/6 binary64) (pow.f64 eh #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 eh #s(literal -1 binary64)))) t)) |
#s(approx (* 1/2 (/ (cos t) (* eh (sin t)))) (/.f64 (fma.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/945 binary64) (/.f64 (*.f64 t t) eh)) (*.f64 #s(literal 1/90 binary64) (pow.f64 eh #s(literal -1 binary64))))) (*.f64 #s(literal 1/6 binary64) (pow.f64 eh #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 eh #s(literal -1 binary64)))) t)) |
#s(approx (/ (cos t) (* eh (sin t))) (pow.f64 (*.f64 eh t) #s(literal -1 binary64))) |
#s(approx (/ (cos t) (* eh (sin t))) (/.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 t t) eh) (pow.f64 eh #s(literal -1 binary64))) t)) |
#s(approx (/ (cos t) (* eh (sin t))) (/.f64 (fma.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/45 binary64) (/.f64 (*.f64 t t) eh)) (*.f64 #s(literal 1/3 binary64) (pow.f64 eh #s(literal -1 binary64)))) (pow.f64 eh #s(literal -1 binary64))) t)) |
#s(approx (/ (cos t) (* eh (sin t))) (/.f64 (fma.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -2/945 binary64) (/.f64 (*.f64 t t) eh)) (*.f64 #s(literal 1/45 binary64) (pow.f64 eh #s(literal -1 binary64))))) (*.f64 #s(literal 1/3 binary64) (pow.f64 eh #s(literal -1 binary64)))) (pow.f64 eh #s(literal -1 binary64))) t)) |
#s(approx (* eh (sin t)) (*.f64 eh t)) |
#s(approx (* eh (sin t)) (*.f64 t (+.f64 eh (*.f64 #s(literal -1/6 binary64) (*.f64 eh (*.f64 t t)))))) |
#s(approx (* eh (sin t)) (*.f64 t (+.f64 eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/6 binary64) eh (*.f64 #s(literal 1/120 binary64) (*.f64 eh (*.f64 t t)))))))) |
#s(approx (* eh (sin t)) (*.f64 t (+.f64 eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/6 binary64) eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/5040 binary64) (*.f64 eh (*.f64 t t)) (*.f64 #s(literal 1/120 binary64) eh)))))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t)))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (+.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (*.f64 t t) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))) ew)))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (+.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))) ew) (*.f64 (*.f64 t t) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) #s(literal 2 binary64)) (*.f64 ew ew)) (*.f64 #s(literal 24 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh))))) ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) #s(literal 2 binary64)) (*.f64 ew ew)))))))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (+.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))) ew) (*.f64 (*.f64 t t) (fma.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (fma.f64 #s(literal -1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) #s(literal 2 binary64)) (*.f64 ew ew)) (*.f64 #s(literal 24 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh))))) ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) #s(literal 2 binary64)) (*.f64 ew ew)))) (*.f64 (*.f64 t t) (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (pow.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) #s(literal 3 binary64)) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal -1/720 binary64) (fma.f64 #s(literal -720 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh)))))) (*.f64 ew ew)) (fma.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) #s(literal 3 binary64)) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh)))) (fma.f64 #s(literal -1/5040 binary64) (/.f64 ew eh) (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))))) ew)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) #s(literal 2 binary64)) (*.f64 ew ew)) (*.f64 #s(literal 24 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh))))) ew))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))) ew)))))))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (*.f64 #s(literal -1 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))) ew)) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 t t) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) #s(literal 2 binary64)) (*.f64 ew ew)) (*.f64 #s(literal 24 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh))))) ew))))) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) ew))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 t t) (fma.f64 #s(literal -720 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh)))))) (*.f64 ew ew)) (fma.f64 #s(literal 240 binary64) (/.f64 (pow.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) #s(literal 3 binary64)) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal 720 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/720 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh)))) (fma.f64 #s(literal -1/5040 binary64) (/.f64 ew eh) (*.f64 #s(literal 1/120 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))))) ew)))))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -12 binary64) (/.f64 (pow.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) #s(literal 2 binary64)) (*.f64 ew ew)) (*.f64 #s(literal 24 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal 1/24 binary64) (/.f64 ew eh)) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))) (*.f64 #s(literal 1/120 binary64) (/.f64 ew eh))))) ew)))))) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))) ew))) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 ew (*.f64 eh t)))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 ew eh) (*.f64 t (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))))) t)) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 ew eh) (*.f64 t (+.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (*.f64 #s(literal 1/2 binary64) (*.f64 t (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))))) t)) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 ew eh) (*.f64 t (+.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 t (*.f64 (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 ew eh))) (*.f64 #s(literal -1 binary64) (log.f64 t))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh)))))) ew) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 ew eh)) (*.f64 #s(literal -1/6 binary64) (/.f64 ew eh))))))))) t)) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew) (*.f64 t (-.f64 (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/24 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) ew)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) ew) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) ew) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew)))) (fma.f64 #s(literal 1/24 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (pow.f64 ew #s(literal 3 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) ew) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) ew) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (pow.f64 ew #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) ew) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) ew) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal -2/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (/.f64 (*.f64 eh (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) ew)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (pow.f64 ew #s(literal 3 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew)))) (*.f64 ew ew)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (pow.f64 ew #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (*.f64 ew ew))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew))) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -2/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (/.f64 (*.f64 eh (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) ew)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (*.f64 ew ew)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))))) (*.f64 ew ew)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (*.f64 ew ew))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))))))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (/.f64 eh ew)))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 t (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew))) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (/.f64 eh ew)))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 t (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 t (-.f64 (fma.f64 #s(literal -2/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (/.f64 (*.f64 eh (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) ew)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64)))))) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew))))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew))) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (/.f64 eh ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 t (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (/.f64 eh ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 t (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 t (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew))) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (/.f64 eh ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (*.f64 t (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 t (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 t (-.f64 (fma.f64 #s(literal -2/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 ew ew)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) ew))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64)))))) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew))) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (/.f64 eh ew)))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh t) #s(literal 2 binary64)) (*.f64 ew ew))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))))) (*.f64 ew ew))))))) (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))))))))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh t) #s(literal 2 binary64)) (*.f64 ew ew)))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (fma.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) |
#s(approx (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (fma.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) (/.f64 (pow.f64 (*.f64 eh t) #s(literal 2 binary64)) (*.f64 ew ew))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) (*.f64 (*.f64 t t) (fma.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) (*.f64 (*.f64 t t) (fma.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) |
#s(approx (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)) (*.f64 (*.f64 t t) (fma.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/315 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 2/45 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (fma.f64 #s(literal -2/45 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/3 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))))))) (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) |
#s(approx (pow (* eh (sin t)) 2) (pow.f64 (*.f64 eh t) #s(literal 2 binary64))) |
#s(approx (pow (* eh (sin t)) 2) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (*.f64 eh t) #s(literal 2 binary64)) (*.f64 eh eh)))) |
#s(approx (pow (* eh (sin t)) 2) (*.f64 (*.f64 t t) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/3 binary64) (*.f64 eh eh) (*.f64 #s(literal 2/45 binary64) (pow.f64 (*.f64 eh t) #s(literal 2 binary64)))) (*.f64 eh eh)))) |
#s(approx (pow (* eh (sin t)) 2) (*.f64 (*.f64 t t) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/3 binary64) (*.f64 eh eh) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/315 binary64) (pow.f64 (*.f64 eh t) #s(literal 2 binary64)) (*.f64 #s(literal 2/45 binary64) (*.f64 eh eh))))) (*.f64 eh eh)))) |
#s(approx (pow (* ew (cos t)) 2) (*.f64 ew ew)) |
#s(approx (pow (* ew (cos t)) 2) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 ew t) #s(literal 2 binary64)) (*.f64 ew ew))) |
#s(approx (pow (* ew (cos t)) 2) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (*.f64 ew ew) (*.f64 #s(literal 1/3 binary64) (pow.f64 (*.f64 ew t) #s(literal 2 binary64)))) (*.f64 ew ew))) |
#s(approx (pow (* ew (cos t)) 2) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1 binary64) (*.f64 ew ew) (*.f64 (*.f64 t t) (fma.f64 #s(literal -2/45 binary64) (pow.f64 (*.f64 ew t) #s(literal 2 binary64)) (*.f64 #s(literal 1/3 binary64) (*.f64 ew ew))))) (*.f64 ew ew))) |
#s(approx (* ew (cos t)) ew) |
#s(approx (* ew (cos t)) (+.f64 ew (*.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 t t))))) |
#s(approx (* ew (cos t)) (+.f64 ew (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) ew (*.f64 #s(literal 1/24 binary64) (*.f64 ew (*.f64 t t))))))) |
#s(approx (* ew (cos t)) (+.f64 ew (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) ew (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/720 binary64) (*.f64 ew (*.f64 t t)) (*.f64 #s(literal 1/24 binary64) ew))))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 t (-.f64 (/.f64 eh ew) (*.f64 #s(literal -1 binary64) (/.f64 eh ew)))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 t (-.f64 (fma.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (/.f64 eh ew)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew)))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 t (-.f64 (fma.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)) (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (/.f64 eh ew)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew)))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 eh t) ew))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (+.f64 #s(literal 1 binary64) (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (*.f64 #s(literal -1 binary64) (/.f64 eh ew)))))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (+.f64 #s(literal 1 binary64) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (*.f64 #s(literal -1 binary64) (/.f64 eh ew)))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh t) ew)))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) t) (*.f64 ew ew))) (/.f64 eh ew))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (+.f64 #s(literal 1 binary64) (*.f64 t (-.f64 (*.f64 t (fma.f64 #s(literal -1/3 binary64) (/.f64 (*.f64 eh t) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (/.f64 eh ew))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+.f64 #s(literal 2 binary64) (*.f64 t (-.f64 (/.f64 (*.f64 (*.f64 eh eh) t) (*.f64 ew ew)) (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)))))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (+.f64 #s(literal 2 binary64) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh t) ew))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (+.f64 #s(literal 2 binary64) (*.f64 t (-.f64 (/.f64 (*.f64 (*.f64 eh eh) t) (*.f64 ew ew)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew)))))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (+.f64 #s(literal 2 binary64) (*.f64 t (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 t (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 #s(literal -1 binary64) (/.f64 eh ew)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 eh (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew)))) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (*.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew))))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (fma.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (fma.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (*.f64 #s(literal -1 binary64) (/.f64 eh ew))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (fma.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 t (-.f64 (*.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))))) (*.f64 #s(literal -1 binary64) (/.f64 eh ew))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (fma.f64 ew (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (/.f64 eh (*.f64 ew ew)))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (fma.f64 (*.f64 t t) (fma.f64 ew (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh (*.f64 ew ew)) (*.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh))) (*.f64 #s(literal -1/2 binary64) (/.f64 eh (*.f64 ew ew))))) (*.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (/.f64 eh (*.f64 ew ew))))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (fma.f64 (*.f64 t t) (fma.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (/.f64 eh (*.f64 ew ew))) (*.f64 (*.f64 t t) (fma.f64 ew (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (*.f64 #s(literal 2/45 binary64) (/.f64 eh (*.f64 ew ew)))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 eh (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (/.f64 eh (*.f64 ew ew)))) (*.f64 #s(literal 1/24 binary64) (/.f64 eh (*.f64 ew ew)))))) (*.f64 ew (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh (*.f64 ew ew)) (*.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh))) (*.f64 #s(literal -1/2 binary64) (/.f64 eh (*.f64 ew ew)))))))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh)) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (/.f64 eh (*.f64 ew ew))) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (fma.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh (*.f64 ew ew)) (*.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh))) (*.f64 #s(literal -1/2 binary64) (/.f64 eh (*.f64 ew ew)))) (/.f64 eh (*.f64 ew ew)))) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh))) |
#s(approx (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh)) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (fma.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh (*.f64 ew ew)) (fma.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (*.f64 #s(literal 2/45 binary64) (/.f64 eh (*.f64 ew ew)))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 eh (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (/.f64 eh (*.f64 ew ew)))) (*.f64 #s(literal 1/24 binary64) (/.f64 eh (*.f64 ew ew)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 eh (*.f64 ew ew)))) (/.f64 eh (*.f64 ew ew)))) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh))) |
#s(approx (/ (pow (sin t) 2) (cos t)) (*.f64 t t)) |
#s(approx (/ (pow (sin t) 2) (cos t)) (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/6 binary64) (*.f64 t t))))) |
#s(approx (/ (pow (sin t) 2) (cos t)) (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal 31/360 binary64) (*.f64 t t))))))) |
#s(approx (/ (pow (sin t) 2) (cos t)) (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 31/360 binary64) (*.f64 #s(literal 173/5040 binary64) (*.f64 t t))))))))) |
#s(approx (pow (sin t) 2) (*.f64 t t)) |
#s(approx (pow (sin t) 2) (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 t t))))) |
#s(approx (pow (sin t) 2) (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 1/3 binary64)))))) |
#s(approx (pow (sin t) 2) (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (*.f64 t t)))) #s(literal 1/3 binary64)))))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh)) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh))) |
#s(approx (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh))))) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 ew (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (+ (* -1 (* ew (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))))) (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))) (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))))))) |
#s(approx (cos t) (cos.f64 t)) |
#s(approx (tan t) (tan.f64 t)) |
#s(approx (/ (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))) (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t))))))) |
#s(approx (* eh (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))) (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (* (sin t) (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))) (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))))))))) |
#s(approx (sin t) (sin.f64 t)) |
#s(approx (- (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))) (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t))))))))) |
#s(approx (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))) (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))))) |
#s(approx (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t)))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))))))) |
#s(approx (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (*.f64 #s(literal -1 binary64) (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t))))))) |
#s(approx (+ (exp (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))) (exp (neg (log (* ew (* 1/2 (/ (cos t) (* eh (sin t))))))))) (+.f64 (exp.f64 (neg.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (*.f64 eh (sin.f64 t)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t)))) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) |
#s(approx (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) |
#s(approx (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 eh (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (/ (pow (sin t) 2) (cos t)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) |
#s(approx (pow (sin t) 2) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) |
Compiled 353 908 to 16 414 computations (95.4% saved)
7 alts after pruning (2 fresh and 5 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1 684 | 2 | 1 686 |
| Fresh | 0 | 0 | 0 |
| Picked | 1 | 2 | 3 |
| Done | 0 | 3 | 3 |
| Total | 1 685 | 7 | 1 692 |
| Status | Accuracy | Program |
|---|---|---|
| ✓ | 49.2% | (*.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
| ✓ | 99.7% | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| ✓ | 46.7% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) eh))) |
| ▶ | 27.7% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh))) |
| ✓ | 90.3% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
| ▶ | 84.0% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
| ✓ | 32.9% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
Compiled 713 to 321 computations (55% saved)
| Inputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew))) |
(neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)) |
(*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
(-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
(*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) |
(/.f64 eh ew) |
eh |
ew |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t))) |
(*.f64 #s(literal -1 binary64) (sin.f64 t)) |
#s(literal -1 binary64) |
(sin.f64 t) |
t |
(*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(cos.f64 t) |
(cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(*.f64 (/.f64 eh ew) (tan.f64 t)) |
(tan.f64 t) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh)) |
(*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew)) |
(/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew) |
(+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
(/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) |
(*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) |
(pow.f64 (sin.f64 t) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) |
(*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(*.f64 ew ew) |
(*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
| Outputs |
|---|
#s(approx (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) #s(hole binary64 (fabs (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow eh 2) (- (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t)))))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow eh 2) (- (* eh (- (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t)))))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* eh (+ (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) ew)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* eh (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) ew)) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) ew))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* 1/2 (/ (* (pow eh 2) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* 1/2 (/ (* (pow eh 2) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* -1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1/4 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (+ (* -1/4 (/ (* (sin t) (* (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)) (* 1/2 (/ (* (pow (sin t) 2) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))) (* (pow ew 2) (pow (cos t) 2))))))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))))) |
#s(approx (/ eh ew) #s(hole binary64 (/ eh ew))) |
#s(approx eh #s(hole binary64 eh)) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* 1/2 (* eh (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* 1/2 (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* eh (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* 1/2 (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* eh (- (+ (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (* 1/2 (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* 1/2 (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* eh (- (+ (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (+ (* 1/2 (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (* eh (- (* 1/2 (* (sin t) (+ (* -1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1/4 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t))))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 2) (pow (cos t) 2)))))))) (+ (* -1/4 (* (sin t) (* (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* (pow (sin t) 2) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* (pow ew 2) (pow (cos t) 2))))))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (cos (neg (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (neg (atan (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (atan (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (atan (* (/ eh ew) (tan t))) #s(hole binary64 (atan (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (/ (* eh (sin t)) (* ew (cos t))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (- (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (- (* eh (- (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))) eh))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (/ (* ew (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))) eh))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (+ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (cos t))) eh))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) #s(hole binary64 (/ (* eh (pow (sin t) 2)) (cos t)))) |
#s(approx (* eh (pow (sin t) 2)) #s(hole binary64 (* eh (pow (sin t) 2)))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (/ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (cos (atan (* (/ eh ew) (tan t)))) #s(hole binary64 (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (- (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (- (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) ew)))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (/ (* eh (sin t)) ew)))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4))))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (* eh (sin t)) ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)))) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4))))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (+ (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/8 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))))) (pow eh 6))) (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4)))))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (+ (* -1/8 (/ (* (pow ew 4) (* (pow (cos t) 4) (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))))) (* (pow eh 6) (pow (sin t) 4)))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (pow (sin t) 3))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (sin t))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 6) (sin t)))) (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2))))) (pow eh 6)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (sin t)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (* -1 (sin t)) (* 1/2 (/ (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2)))) (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (* -1 (sin t)) (+ (* 1/2 (/ (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (* 1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow eh 4))))) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (+ (* 1/8 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (* -1 (sin t)) (+ (* 1/2 (/ (* ew (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/8 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2))))))) (pow eh 6))) (+ (* 1/2 (/ (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (* 1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow eh 4)))))) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (+ (* -1/8 (/ (* (pow ew 4) (* (pow (cos t) 4) (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))))) (* (pow eh 6) (pow (sin t) 4)))) (+ (* 1/8 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))))) (+ (* 1/8 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 3))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (sin t))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 6) (sin t)))) (* 1/2 (/ (* ew (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))))) (pow eh 6))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (+ (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (* eh (pow (sin t) 2)) (* ew (cos t))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* eh (+ (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (pow eh 2)) (/ (pow (sin t) 2) (* ew (cos t))))))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (/ (* eh (pow (sin t) 2)) (* ew (cos t))))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (* eh (+ (/ (* ew (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (pow eh 2)) (/ (pow (sin t) 2) (* ew (cos t))))))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (* eh (pow (sin t) 2)) (cos t)))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (* eh (+ (/ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (pow eh 2)) (/ (pow (sin t) 2) (cos t)))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (- (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (- (* -1 (/ (- (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2)) (* -1 (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))))) eh)) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) eh))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (+ (* -1 (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))) (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2)))) eh))) eh))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (* -1 (/ (- (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* eh ew)) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (* -1 (/ (- (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 2) ew))) (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) ew))) eh)) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (* eh (sin t)) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* eh (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (+ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* eh (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) eh))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (- (* -1 (/ (+ (* -1 (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* -1 (/ (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))) eh)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (* eh (sin t)) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (+ (* -1 (/ (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 4))) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (+ (* -1 (/ (- (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (pow eh 6))) (+ (* -1 (/ (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 4))) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (sin t))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (sin t) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (sin t) (+ (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (sin t) (+ (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5)))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (+ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) eh)) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (- (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))) eh))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (pow eh 2))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (pow eh 2))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (pow eh 2))) (* -1 (/ (pow (sin t) 2) (cos t)))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (- (* -1 (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (- (* ew (- (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))) (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* ew (+ (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* ew (- (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* ew (- (* ew (+ (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* ew (- (* ew (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* ew (- (* ew (- (+ (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* (pow ew 2) (- (+ (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* (pow ew 2) (- (+ (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow ew 2) (- (+ (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/8 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2)))))))) (+ (* -1/8 (/ (* (pow (cos t) 4) (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))))) (* (pow eh 4) (pow (sin t) 4)))) (+ (* 1/2 (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t))))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))))) ew))) |
#s(approx ew #s(hole binary64 ew)) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (* -1 (sin t)) (* (pow ew 2) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (* -1 (sin t)) (* (pow ew 2) (- (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* (pow ew 2) (- (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) eh)) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))) (* eh (sin t)))))))) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (* -1 (sin t)) (* (pow ew 2) (- (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* (pow ew 2) (- (+ (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) eh)) (* (pow ew 2) (- (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/8 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))) eh)) (+ (* -1/8 (/ (* (pow (cos t) 4) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh)))) (* (pow eh 4) (pow (sin t) 4)))) (+ (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) eh)) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))) (* eh (sin t)))))))) (* eh (sin t)))) (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2)))))) eh))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))) (* eh (sin t)))))))) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (* -1 (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (* ew (+ (* -1 (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* ew (+ (* -1 (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* ew (+ (* ew (- (* -1 (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (pow ew 2) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) ew))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)) ew))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew ew) #s(hole binary64 (pow ew 2))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (- (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (- (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2)))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (pow ew 3))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (pow ew 4))) (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (pow ew 4))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (pow ew 3))) (+ (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 4) (pow (cos t) 2)))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* 1/2 (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) ew))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* 1/2 (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (* 1/2 (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (pow ew 2))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (pow ew 2))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) ew)) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2))))))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* 1/2 (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (+ (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t)))))) (pow ew 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (pow ew 2)))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (pow ew 2))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow (cos t) 2)))))) (pow ew 3))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) ew)) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (pow ew 3))) (+ (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (* (pow ew 3) (pow (cos t) 2)))))))))) (pow ew 2)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* 1/2 (/ (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* 1/2 (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* 1/2 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) ew))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* 1/2 (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))) (pow ew 2))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (pow ew 2))) (+ (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) ew)) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2))))))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* 1/2 (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (+ (* 1/2 (/ (* (sin t) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (+ (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t))))) (pow ew 3))) (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))) (pow ew 2)))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (pow ew 2))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow (cos t) 2)))))) (pow ew 3))) (+ (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) ew)) (+ (* -1/4 (/ (* (sin t) (* (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 3))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* (pow ew 3) (pow (cos t) 2)))))))))) ew))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (- (+ (* -1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (- (+ (* -1 (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 4))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* ew (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (* ew (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (* (pow ew 2) (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* -1 (/ (- (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) (pow ew 3))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* -1 (/ (- (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) ew)) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (* ew (pow (cos t) 2)))))) (pow ew 3))) (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2)))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* -1/2 (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (/ (- (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) ew)) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (* ew (pow (cos t) 2)))))) ew)) (* -1/2 (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* -1 (/ (- (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))))))) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2)))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))))) ew))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))))))) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2)))))) ew)) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))))))) (* ew (pow (cos t) 2))))))) ew))) ew)) (* -1/2 (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) (pow ew 2)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1/2 (/ (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) ew)) (* 1/2 (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2))))) ew)) (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) ew)) (* 1/2 (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2))))))) (+ (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (pow (cos t) 2)))))) ew)) (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2))))) ew)) (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) ew)) (* 1/2 (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (- (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))) (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (- (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew) (* 1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (pow ew 3)))) (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))))))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* -1/2 (* ew (* t (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* t (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/6 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* -1 (* ew (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow t 2) (- (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow t 2) (- (* t (- (* -1 (* ew (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* ew (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* 1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* t (+ (* 1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* ew (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) ew))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* t (+ (* 1/2 (/ (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) ew)) (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow t 2) (- (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow t 2) (- (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow t 2) (- (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (+ (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (+ (* 1/24 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3)))))))) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* 1/2 (/ (* eh (* (pow t 2) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (+ (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3))))))) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (+ (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (+ (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (* t (- (* 1/2 (/ (* eh (- (+ (* -2/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (+ (* -1/6 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (/ (* eh (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) ew)))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3))))))) (+ (* -1/4 (/ (* eh (* (+ (* -1/3 (/ eh ew)) (+ (* 1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)) (* 1/2 (/ (* (pow eh 2) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))) (pow ew 2)))))))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3))))))) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* 1/2 (* (pow t 2) (- (* -1 (/ eh ew)) (/ eh ew)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (- (* -1 (/ eh ew)) (/ eh ew))) (* t (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (- (* -1 (/ eh ew)) (/ eh ew))) (* t (- (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* t (- (* 1/2 (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew))))))) (* 1/4 (/ (* (pow eh 2) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 2))))))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (- (* -1 (/ eh ew)) (/ eh ew))) (* t (- (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* t (- (+ (* 1/2 (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (* t (- (* 1/2 (- (+ (* -2/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (+ (* -1/6 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (/ (* eh (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) ew)))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew))))))) (* 1/4 (/ (* (pow eh 2) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 2))))))) (+ (* -1/4 (* (+ (* -1/3 (/ eh ew)) (+ (* 1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (- (* -1 (/ eh ew)) (/ eh ew)))) (* 1/2 (/ (* (pow eh 2) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))) (pow ew 2)))))))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew))))))) (* 1/4 (/ (* (pow eh 2) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 2))))))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))))))) |
#s(approx (* -1 (sin t)) #s(hole binary64 (* -1 t))) |
#s(approx (* -1 (sin t)) #s(hole binary64 (* t (- (* 1/6 (pow t 2)) 1)))) |
#s(approx (* -1 (sin t)) #s(hole binary64 (* t (- (* (pow t 2) (+ 1/6 (* -1/120 (pow t 2)))) 1)))) |
#s(approx (* -1 (sin t)) #s(hole binary64 (* t (- (* (pow t 2) (+ 1/6 (* (pow t 2) (- (* 1/5040 (pow t 2)) 1/120)))) 1)))) |
#s(approx (sin t) #s(hole binary64 t)) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* -1/6 (pow t 2)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* 1/120 (pow t 2)) 1/6)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/120 (* -1/5040 (pow t 2)))) 1/6)))))) |
#s(approx t #s(hole binary64 t)) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* -1/2 (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/24 (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/720 (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (cos t) #s(hole binary64 1)) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* -1/2 (pow t 2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* 1/24 (pow t 2)) 1/2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/24 (* -1/720 (pow t 2)))) 1/2))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (/ (* eh t) ew))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* 1/3 (/ (* eh (pow t 2)) ew)) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 2/15 (/ (* eh (pow t 2)) ew)) (* 1/3 (/ eh ew)))) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 1/3 (/ eh ew)) (* (pow t 2) (+ (* 17/315 (/ (* eh (pow t 2)) ew)) (* 2/15 (/ eh ew)))))) (/ eh ew))))) |
#s(approx (tan t) #s(hole binary64 t)) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* 1/3 (pow t 2)))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* 2/15 (pow t 2)))))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* (pow t 2) (+ 2/15 (* 17/315 (pow t 2)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* eh (* (pow t 2) (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew))))) (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* eh (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* eh (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew)))) (* t (+ (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* eh (* t (- (+ (* -1/2 (/ (pow eh 3) (pow ew 3))) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (+ (* -1/2 (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (+ (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* t (- (* t (- (+ (* -1/2 (/ (pow eh 3) (pow ew 3))) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))))) (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (+ (* ew (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2))))) (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (+ (* (pow t 2) (+ (* ew (* (pow t 2) (- (+ (* -1/3 (/ eh (pow ew 2))) (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 (/ eh (pow ew 2)))))) (* ew (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2)))))) (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (+ (* (pow t 2) (+ (* ew (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2)))) (* (pow t 2) (+ (* ew (* (pow t 2) (- (+ (* -1/720 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 2/45 (/ eh (pow ew 2)))) (+ (* -1/2 (- (* -1/3 (/ eh (pow ew 2))) (* -1/2 (/ eh (pow ew 2))))) (* 1/24 (/ eh (pow ew 2))))))) (* ew (- (+ (* -1/3 (/ eh (pow ew 2))) (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 (/ eh (pow ew 2))))))))) (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh ew))) (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (+ (* (pow t 2) (- (+ (* -1/3 (/ eh ew)) (* 1/24 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 (/ eh ew)))) (/ eh ew)))) (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (+ (* (pow t 2) (- (+ (* -1/3 (/ eh ew)) (+ (* 1/24 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (- (+ (* -1/720 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 2/45 (/ eh ew))) (+ (* -1/2 (/ (- (* -1/3 eh) (* -1/2 eh)) ew)) (* 1/24 (/ eh ew))))))) (* -1/2 (/ eh ew)))) (/ eh ew)))) (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (* (pow t 2) (+ eh (* -1/2 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (* (pow t 2) (+ eh (+ (* -1/2 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (- (+ (* -1/3 eh) (* 1/24 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 eh)))))) (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (* (pow t 2) (+ eh (+ (* -1/2 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (- (+ (* -1/3 eh) (+ (* 1/24 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (- (+ (* -1/720 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 2/45 eh)) (+ (* -1/2 (- (* -1/3 eh) (* -1/2 eh))) (* 1/24 eh)))))) (* -1/2 eh)))))) (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) #s(hole binary64 (* eh (pow t 2)))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) #s(hole binary64 (* (pow t 2) (+ eh (* (pow t 2) (- (* -1/3 eh) (* -1/2 eh))))))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) #s(hole binary64 (* (pow t 2) (+ eh (* (pow t 2) (- (+ (* -1/3 eh) (* (pow t 2) (- (* 2/45 eh) (+ (* -1/2 (- (* -1/3 eh) (* -1/2 eh))) (* 1/24 eh))))) (* -1/2 eh))))))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) #s(hole binary64 (* (pow t 2) (+ eh (* (pow t 2) (- (+ (* -1/3 eh) (* (pow t 2) (- (+ (* 2/45 eh) (* (pow t 2) (- (* -1/315 eh) (+ (* -1/2 (- (* 2/45 eh) (+ (* -1/2 (- (* -1/3 eh) (* -1/2 eh))) (* 1/24 eh)))) (+ (* -1/720 eh) (* 1/24 (- (* -1/3 eh) (* -1/2 eh)))))))) (+ (* -1/2 (- (* -1/3 eh) (* -1/2 eh))) (* 1/24 eh))))) (* -1/2 eh))))))) |
#s(approx (* eh (pow (sin t) 2)) #s(hole binary64 (* eh (pow t 2)))) |
#s(approx (* eh (pow (sin t) 2)) #s(hole binary64 (* (pow t 2) (+ eh (* -1/3 (* eh (pow t 2))))))) |
#s(approx (* eh (pow (sin t) 2)) #s(hole binary64 (* (pow t 2) (+ eh (* (pow t 2) (+ (* -1/3 eh) (* 2/45 (* eh (pow t 2))))))))) |
#s(approx (* eh (pow (sin t) 2)) #s(hole binary64 (* (pow t 2) (+ eh (* (pow t 2) (+ (* -1/3 eh) (* (pow t 2) (+ (* -1/315 (* eh (pow t 2))) (* 2/45 eh))))))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (pow t 2))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (* (pow t 2) (+ 1 (* -1/3 (pow t 2)))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (* (pow t 2) (+ 1 (* (pow t 2) (- (* 2/45 (pow t 2)) 1/3)))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (* (pow t 2) (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 2/45 (* -1/315 (pow t 2)))) 1/3)))))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* -1/2 (/ (* (pow ew 2) (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 1/24 (/ (* (pow ew 2) (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (+ (* -1/720 (/ (* (pow ew 2) (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* 1/24 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))))) (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (* -1/2 (* (pow ew 2) (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/24 (* (pow ew 2) (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/720 (* (pow ew 2) (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (+ (cos (atan (/ (* eh (sin t)) (* ew (cos t))))) (* -1/2 (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (+ (cos (atan (/ (* eh (sin t)) (* ew (cos t))))) (* (pow t 2) (+ (* -1/2 (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* 1/24 (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (+ (cos (atan (/ (* eh (sin t)) (* ew (cos t))))) (* (pow t 2) (+ (* -1/2 (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/720 (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/24 (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (* -1 (sin t)) #s(hole binary64 (* -1 (sin t)))) |
#s(approx (sin t) #s(hole binary64 (sin t))) |
#s(approx (cos t) #s(hole binary64 (cos t))) |
#s(approx (tan t) #s(hole binary64 (/ (sin t) (cos t)))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (pow (sin t) 2))) |
9 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 22.0ms | t | @ | inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/ eh ew) eh ew (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (* -1 (sin t)) -1 (sin t) t (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))) (neg (atan (* (/ eh ew) (tan t)))) (atan (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (tan t) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (/ (* eh (pow (sin t) 2)) (cos t)) (* eh (pow (sin t) 2)) (pow (sin t) 2) 2 (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (cos (atan (* (/ eh ew) (tan t))))) |
| 20.0ms | t | @ | -inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/ eh ew) eh ew (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (* -1 (sin t)) -1 (sin t) t (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))) (neg (atan (* (/ eh ew) (tan t)))) (atan (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (tan t) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (/ (* eh (pow (sin t) 2)) (cos t)) (* eh (pow (sin t) 2)) (pow (sin t) 2) 2 (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (cos (atan (* (/ eh ew) (tan t))))) |
| 17.0ms | eh | @ | -inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/ eh ew) eh ew (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (* -1 (sin t)) -1 (sin t) t (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))) (neg (atan (* (/ eh ew) (tan t)))) (atan (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (tan t) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (/ (* eh (pow (sin t) 2)) (cos t)) (* eh (pow (sin t) 2)) (pow (sin t) 2) 2 (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (cos (atan (* (/ eh ew) (tan t))))) |
| 13.0ms | ew | @ | 0 | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/ eh ew) eh ew (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (* -1 (sin t)) -1 (sin t) t (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))) (neg (atan (* (/ eh ew) (tan t)))) (atan (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (tan t) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (/ (* eh (pow (sin t) 2)) (cos t)) (* eh (pow (sin t) 2)) (pow (sin t) 2) 2 (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (cos (atan (* (/ eh ew) (tan t))))) |
| 13.0ms | ew | @ | -inf | ((fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/ eh ew) eh ew (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (* -1 (sin t)) -1 (sin t) t (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))) (neg (atan (* (/ eh ew) (tan t)))) (atan (* (/ eh ew) (tan t))) (* (/ eh ew) (tan t)) (tan t) (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (/ (* eh (pow (sin t) 2)) (cos t)) (* eh (pow (sin t) 2)) (pow (sin t) 2) 2 (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (cos (atan (* (/ eh ew) (tan t))))) |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 2703 | 83797 |
| 0 | 2750 | 78917 |
| 0 | 8651 | 77483 |
| 1× | iter limit |
| 1× | node limit |
| 1× | iter limit |
| Inputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew))) |
(neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)) |
(*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
(-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
(*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) |
(/.f64 eh ew) |
eh |
ew |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t))) |
(*.f64 #s(literal -1 binary64) (sin.f64 t)) |
#s(literal -1 binary64) |
(sin.f64 t) |
t |
(*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(cos.f64 t) |
(cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(*.f64 (/.f64 eh ew) (tan.f64 t)) |
(tan.f64 t) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh)) |
(*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew)) |
(/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew) |
(+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
(/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) |
(*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) |
(pow.f64 (sin.f64 t) #s(literal 2 binary64)) |
#s(literal 2 binary64) |
(/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) |
(*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(*.f64 ew ew) |
(*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) #s(hole binary64 (fabs (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow eh 2) (- (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t)))))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow eh 2) (- (* eh (- (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t)))))) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* ew (cos t)))) (* eh (+ (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) ew)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow eh 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (cos t)))) (* eh (+ (* 1/2 (/ (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) ew)) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3))))))) ew))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* 1/2 (/ (* (pow eh 2) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* 1/2 (/ (* (pow eh 2) (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow eh 2) (+ (* 1/2 (/ (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* eh (- (+ (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (* eh (- (* 1/2 (/ (* (sin t) (+ (* -1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1/4 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t)))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (+ (* -1/4 (/ (* (sin t) (* (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)) (* 1/2 (/ (* (pow (sin t) 2) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))) (* (pow ew 2) (pow (cos t) 2))))))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) ew)) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 3) (pow (cos t) 2)))))))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) ew)))))))) |
#s(approx (/ eh ew) #s(hole binary64 (/ eh ew))) |
#s(approx eh #s(hole binary64 eh)) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* 1/2 (* eh (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* 1/2 (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* eh (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* 1/2 (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* eh (- (+ (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (* 1/2 (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* eh (+ (* 1/2 (* (sin t) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))) (* eh (- (+ (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* eh (- (+ (* 1/2 (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (* eh (- (* 1/2 (* (sin t) (+ (* -1/2 (/ (* (pow (sin t) 2) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* (pow ew 2) (pow (cos t) 2)))) (+ (* -1/4 (/ (pow (sin t) 4) (* (pow ew 4) (pow (cos t) 4)))) (/ (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t))))) (* ew (cos t))))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 2) (pow (cos t) 2)))))))) (+ (* -1/4 (* (sin t) (* (+ (* 1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))) (* 1/2 (/ (* (pow (sin t) 2) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))) (* (pow ew 2) (pow (cos t) 2))))))))) (+ (* -1/2 (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))))))))) (* 1/4 (/ (* (pow (sin t) 3) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t)))) (- (* -1 (/ (sin t) (* ew (cos t)))) (/ (sin t) (* ew (cos t))))))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (cos (neg (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (neg (atan (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (atan (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (atan (* (/ eh ew) (tan t))) #s(hole binary64 (atan (/ (* eh (sin t)) (* ew (cos t)))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (/ (* eh (sin t)) (* ew (cos t))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (+ (* eh (+ (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* -1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (/ (pow (sin t) 2) (* ew (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (- (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow eh 2) (- (* eh (- (* -1 (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* ew (cos t)))) (+ (* -1/3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (+ (* 1/3 (+ (* -2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))) (* 3 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))) (+ (/ (* (sin t) (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))) (* ew (cos t))) (/ (* (sin t) (+ (* 1/2 (+ (* -1 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))) (* 1/2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))))) (* ew (cos t)))))))) (* -1/2 (/ (pow (sin t) 3) (* (pow ew 3) (pow (cos t) 3)))))))) (* 1/2 (* (sin t) (+ (* -2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2)))) (* 2 (/ (pow (sin t) 2) (* (pow ew 2) (pow (cos t) 2))))))))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))) eh))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (/ (* ew (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (/ (+ (* ew (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* ew (cos t)))) eh))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (+ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (cos t))) eh))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) #s(hole binary64 (/ (* eh (pow (sin t) 2)) (cos t)))) |
#s(approx (* eh (pow (sin t) 2)) #s(hole binary64 (* eh (pow (sin t) 2)))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (/ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (cos (atan (* (/ eh ew) (tan t)))) #s(hole binary64 (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* eh (- (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (- (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* eh (- (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (* ew (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (* (pow eh 2) ew)) (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (* (pow eh 4) ew)))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (/ (* eh (sin t)) ew)))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4))))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (/ (* eh (sin t)) ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2)))) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4))))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* eh (- (+ (* -1 (/ (sin t) ew)) (+ (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/8 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))))) (pow eh 6))) (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))) (pow eh 4)))))) (+ (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))) (pow eh 2))) (+ (* -1/8 (/ (* (pow ew 4) (* (pow (cos t) 4) (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))))) (* (pow eh 6) (pow (sin t) 4)))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (+ (* 1/8 (/ (* (pow ew 3) (pow (cos t) 4)) (pow (sin t) 3))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (sin t))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 6) (sin t)))) (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2))))) (pow eh 6)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (sin t)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (* -1 (sin t)) (* 1/2 (/ (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2)))) (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (* -1 (sin t)) (+ (* 1/2 (/ (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (* 1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow eh 4))))) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (+ (* 1/8 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (* -1 (sin t)) (+ (* 1/2 (/ (* ew (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (+ (* 1/8 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2))))))) (pow eh 6))) (+ (* 1/2 (/ (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (* 1/2 (/ (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow eh 4)))))) (+ (* -1/2 (/ (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))) (pow eh 2))) (+ (* -1/8 (/ (* (pow ew 4) (* (pow (cos t) 4) (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))))) (* (pow eh 6) (pow (sin t) 4)))) (+ (* 1/8 (/ (* (pow ew 4) (pow (cos t) 4)) (* (pow eh 4) (pow (sin t) 3)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 4) (sin t)))) (+ (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))))))) (+ (* 1/8 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 3))) (* 1/2 (/ (* ew (* (cos t) (* (- (* 1/2 (* ew (* (cos t) (+ (* -1/2 (/ (* ew (cos t)) (sin t))) (* 1/2 (/ (* ew (cos t)) (sin t))))))) (* -1/2 (* ew (* (cos t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t)))))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (sin t))))) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (* -1/2 (/ (* ew (cos t)) (sin t))))))) (* (pow eh 6) (sin t)))) (* 1/2 (/ (* ew (* (cos t) (+ (* -2 (/ (* (sin t) (+ (* 1/64 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))) (* 1/16 (/ (* (pow ew 6) (pow (cos t) 6)) (pow (sin t) 6))))) (* ew (cos t)))) (* 1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/4 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3)))))) (pow (sin t) 2)))))) (pow eh 6))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (+ (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (+ (* -1 (/ (* (sin t) (- (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 4) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (/ (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (+ (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 1/24 (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))))))) (+ (* -1/16 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (+ (* 1/32 (/ (* (pow ew 4) (pow (cos t) 4)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 4)))) (* 1/24 (/ (+ (* -3/4 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4))) (* 3 (/ (* (pow ew 4) (pow (cos t) 4)) (pow (sin t) 4)))) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)) (/ (* (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2))))) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))))))) (pow eh 4))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (+ (/ (* (sin t) (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (* (pow (sin t) 2) (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh))))))))))) (/ (* (- (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (- (* -1/4 (/ (* (pow ew 2) (* (pow (cos t) 2) (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) (pow (sin t) 2))) (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (pow (sin t) 2)))))) (pow (+ (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))) (/ 1 (exp (+ (log (* 1/2 (/ (* ew (cos t)) (sin t)))) (log (/ 1 eh)))))) 2)))) (pow eh 2)))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (* eh (pow (sin t) 2)) (* ew (cos t))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* eh (+ (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (pow eh 2)) (/ (pow (sin t) 2) (* ew (cos t))))))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (/ (* eh (pow (sin t) 2)) (* ew (cos t))))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (* eh (+ (/ (* ew (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (pow eh 2)) (/ (pow (sin t) 2) (* ew (cos t))))))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (* eh (pow (sin t) 2)) (cos t)))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (* eh (+ (/ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (pow eh 2)) (/ (pow (sin t) 2) (cos t)))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (- (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* eh (- (* -1 (/ (- (* -1 (/ (- (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2)) (* -1 (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))))) eh)) (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) eh)) (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) eh))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (+ (* -1 (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))) (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2)))) eh))) eh))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (* -1 (/ (- (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (* eh ew)) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (* ew (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (* -1 (/ (- (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (* (pow eh 2) ew))) (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) ew))) eh)) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (* eh (sin t)) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* eh (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (+ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* eh (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) eh))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (- (* -1 (/ (+ (* -1 (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* -1 (/ (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))) eh)) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (* eh (sin t)) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (+ (* -1 (/ (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 4))) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (sin t) ew)) (+ (* -1 (/ (- (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (pow eh 6))) (+ (* -1 (/ (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 4))) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* ew (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (pow eh 2)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (sin t))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (sin t) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (sin t) (+ (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (+ (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (- (+ (sin t) (+ (/ (* (sin t) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5)))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (+ (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 2) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (sin t) (- (* 1/16 (/ (* (pow ew 5) (pow (cos t) 5)) (pow (sin t) 5))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 3)))) (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (+ (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (+ (/ (* (sin t) (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (+ (/ (* (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 4) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))) (/ (* (- (* -1/8 (/ (* (pow ew 3) (pow (cos t) 3)) (pow (sin t) 3))) (* 1/2 (/ (* ew (cos t)) (* (sin t) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (- (/ (* (sin t) (- (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (/ (* (sin t) (+ (* 1/2 (/ (* ew (cos t)) (sin t))) (/ 1 (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* (pow eh 6) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (+ (* -1 (/ (+ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) eh)) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) eh)) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* -1 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* -1 (/ (- (* -1 (/ (* (sin t) (- (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))))) (+ (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (/ (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (+ (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (+ (* 1/24 (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))))) (+ (* -1/4 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))) (+ (* 1/24 (/ (+ (* -3 (/ (* (pow ew 2) (pow (cos t) 2)) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2)))) (* -3 (/ (* (pow ew 3) (pow (cos t) 3)) (* (pow (sin t) 3) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* 1/8 (/ (* (pow ew 2) (pow (cos t) 2)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (pow (sin t) 2) (pow (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))) 2))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)) (/ (* (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2)))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) (pow eh 2))) (* (sin t) (- (+ (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (* (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))))) (/ (* (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (- (* 1/2 (/ (* ew (* (cos t) (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))))) (* 1/2 (/ (* ew (cos t)) (* (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (* (sin t) (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t))))))))))) (pow (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))) 2))))) eh))) eh)) (/ (* (sin t) (- (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh)))))))) (+ (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))) (/ 1 (exp (+ (log (- (/ (sin t) (* ew (cos t))) (* -1 (/ (sin t) (* ew (cos t)))))) (* -1 (log (/ -1 eh))))))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (pow eh 2))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* ew (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (pow eh 2))) (* -1 (/ (pow (sin t) 2) (* ew (cos t))))))))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (* -1 (* eh (+ (* -1 (/ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (pow eh 2))) (* -1 (/ (pow (sin t) 2) (cos t)))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (- (* -1 (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* ew (- (* ew (- (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))) (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* ew (+ (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* -1 (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* ew (- (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (/ (+ (* ew (- (* ew (+ (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))) (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* -1 (* ew (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* ew (- (* ew (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* ew (- (* ew (- (+ (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* (pow ew 2) (- (+ (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (* eh (sin t))) (* (pow ew 2) (- (+ (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow ew 2) (- (+ (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (* (pow ew 2) (- (* 1/2 (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/8 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2)))))))) (+ (* -1/8 (/ (* (pow (cos t) 4) (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))))) (* (pow eh 4) (pow (sin t) 4)))) (+ (* 1/2 (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t))))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 3) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))))) (* eh (sin t)))))))) (* -1/2 (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))))))) ew))) |
#s(approx ew #s(hole binary64 ew)) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (* -1 (sin t)) (* (pow ew 2) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (* -1 (sin t)) (* (pow ew 2) (- (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* (pow ew 2) (- (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) eh)) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))) (* eh (sin t)))))))) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (+ (* -1 (sin t)) (* (pow ew 2) (- (+ (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* (pow ew 2) (- (+ (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) eh)) (* (pow ew 2) (- (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (+ (* 1/8 (/ (pow (cos t) 5) (* (pow eh 5) (pow (sin t) 5)))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2))))))) eh)) (+ (* -1/8 (/ (* (pow (cos t) 4) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh)))) (* (pow eh 4) (pow (sin t) 4)))) (+ (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) eh)) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))) (* eh (sin t)))))))) (* eh (sin t)))) (* 1/2 (/ (* (cos t) (+ (* -2 (/ (* eh (* (sin t) (+ (* 1/64 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6)))) (* 1/16 (/ (pow (cos t) 6) (* (pow eh 6) (pow (sin t) 6))))))) (cos t))) (* 1/4 (/ (* (pow (cos t) 2) (+ (* -1/8 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))) (* 1/4 (/ (pow (cos t) 3) (* (pow eh 3) (pow (sin t) 3)))))) (* (pow eh 2) (pow (sin t) 2)))))) eh))))))) (+ (* 1/8 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 3)))) (* 1/2 (/ (* (cos t) (* (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t))))) (- (* 1/2 (/ (* (cos t) (+ (* -1/2 (/ (cos t) (* eh (sin t)))) (* 1/2 (/ (cos t) (* eh (sin t)))))) eh)) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))) (* eh (sin t)))))))) (* -1/2 (/ (* (cos t) (- (* 1/2 (/ (cos t) (* eh (sin t)))) (* -1/2 (/ (cos t) (* eh (sin t)))))) eh))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (* -1 (* eh (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* -1 (/ (* eh (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))) (* ew (+ (* ew (+ (* -1 (* eh (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (* -1 (* eh (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* ew (+ (* -1 (* ew (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (* ew (+ (* ew (- (* -1 (* (pow ew 2) (* (sin t) (- (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 4) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))))) (+ (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))))) (/ (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (+ (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 1/24 (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))))))) (+ (* -1/16 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (+ (* 1/32 (/ (pow (cos t) 4) (* (pow eh 4) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 4))))) (* 1/24 (/ (+ (* -3/4 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4)))) (* 3 (/ (pow (cos t) 4) (* (pow eh 4) (pow (sin t) 4))))) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)) (/ (* (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2)))))) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (* (sin t) (- (+ (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (* (pow (sin t) 2) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))))) (/ (* (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) (- (* -1/4 (/ (* (pow (cos t) 2) (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))) (* (pow eh 2) (pow (sin t) 2)))) (* -1/4 (/ (pow (cos t) 2) (* (pow eh 2) (* (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (pow (sin t) 2))))))) (pow (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))) 2)))))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (/ (* (sin t) (- (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t)))))))))) (+ (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))) (/ 1 (exp (+ (log ew) (log (* 1/2 (/ (cos t) (* eh (sin t))))))))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (pow ew 2) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) eh)) ew))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)) ew))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (pow ew 2) (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew ew) #s(hole binary64 (pow ew 2))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)) (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (- (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (- (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2)))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (pow ew 3))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (pow ew 4))) (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (pow ew 4))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (pow ew 3))) (+ (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 4) (pow (cos t) 2)))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* 1/2 (/ (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 2))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* 1/2 (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) ew))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* 1/2 (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (* 1/2 (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (pow ew 2))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (pow ew 2))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) ew)) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2))))))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* 1/2 (* eh (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew)) (+ (* 1/2 (/ (* eh (* (sin t) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (+ (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t)))))) (pow ew 3))) (* 1/2 (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (pow ew 2)))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (pow ew 2))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow (cos t) 2)))))) (pow ew 3))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) ew)) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))) (pow ew 3))) (+ (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))))) (* (pow ew 3) (pow (cos t) 2)))))))))) (pow ew 2)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* 1/2 (/ (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* 1/2 (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* 1/2 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew))) (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) ew))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* 1/2 (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))) (pow ew 2))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (pow ew 2))) (+ (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) ew)) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2))))))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (- (+ (* 1/2 (* (sin t) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (+ (* 1/2 (/ (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) ew)) (+ (* 1/2 (/ (* (sin t) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (+ (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))) (/ (* eh (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (cos t))))) (pow ew 3))) (* 1/2 (/ (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t)))) (pow ew 2)))))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t)))))))) (pow ew 2))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow (cos t) 2)))))) (pow ew 3))) (+ (* -1/4 (/ (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) ew)) (+ (* -1/4 (/ (* (sin t) (* (+ (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (pow ew 3))) (+ (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))) (* (pow ew 2) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))))))))) (* (pow ew 3) (pow (cos t) 2)))))))))) ew))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (pow ew 4))) (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (- (+ (* -1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* ew (- (+ (* -1 (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))) (+ (* -1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (+ (* 1/3 (+ (* -2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t)) (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))))))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (pow ew 4))) (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* ew (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (* ew (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (* (pow ew 2) (+ (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t))) (/ (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (/ (* eh (* (sin t) (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) ew)))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (* -1 (/ (- (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* -1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (+ (* -1 (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (* 1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))))) (pow ew 3))) (+ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3)))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) (pow ew 3))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (+ (* -1 (/ (- (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) ew)) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (* ew (pow (cos t) 2)))))) (pow ew 3))) (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2)))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* -1/2 (/ (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow ew 2))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (- (+ (* -1/2 (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) ew))) (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (/ (- (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) ew)) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (* ew (pow (cos t) 2)))))) ew)) (* -1/2 (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) (pow ew 2)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (+ (* -1 (/ (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* -1 (/ (- (+ (* -1 (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))))))) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2)))))) (* 1/2 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))))) ew))) (+ (* -1/2 (/ (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))))))) (* 1/4 (/ (* (pow eh 3) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2)))))) ew)) (+ (* -1/4 (/ (* eh (* (sin t) (* (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* eh (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))))))) (* ew (pow (cos t) 2))))))) ew))) ew)) (* -1/2 (* eh (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) (pow ew 2)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1/2 (/ (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) ew)) (* 1/2 (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2))))) ew)) (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) ew)) (* 1/2 (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (cos t))) (+ (* -1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow (cos t) 2))) (* -1/4 (/ (* (pow eh 4) (pow (sin t) 4)) (pow (cos t) 4))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2))))))) (+ (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) (* 1/2 (/ (* (pow eh 2) (* (pow (sin t) 2) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (pow (cos t) 2)))))) ew)) (* 1/2 (* (sin t) (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (* -1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))))) (+ (* -1/2 (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))))) (* 1/4 (/ (* (pow eh 2) (* (pow (sin t) 3) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))) (pow (cos t) 2))))) ew)) (* 1/2 (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (* -1/4 (* (sin t) (* (+ (* -1 (/ (* eh (sin t)) (cos t))) (/ (* eh (sin t)) (cos t))) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t)))))))) ew)) (* 1/2 (* (sin t) (- (/ (* eh (sin t)) (cos t)) (* -1 (/ (* eh (sin t)) (cos t))))))) ew)))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* 1/2 (/ (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (pow ew 3))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* -1 (* ew (+ (* -1 (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (+ (* -1/2 (* eh (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (/ (* eh (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3)))))) ew)) (pow ew 3))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (- (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* 1/2 (/ (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (pow ew 3)))) (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (* -1 (* ew (- (+ (* -1 (/ (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ (- (/ (* (sin t) (- (* 1/2 (+ (* -1 (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (cos t))) (+ (* -1 (/ (* eh (* (sin t) (+ (* 1/2 (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))) (* 1/2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2)))))) (cos t))) (+ (* 1/3 (+ (* -3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (* 2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) (+ (* 1/3 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))) (/ (* eh (* (sin t) (+ (* -1 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))) (cos t))))))) (* 1/2 (/ (* (pow eh 3) (pow (sin t) 3)) (pow (cos t) 3))))) ew) (* 1/2 (* (sin t) (+ (* -2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))) (* 2 (/ (* (pow eh 2) (pow (sin t) 2)) (pow (cos t) 2))))))) (pow ew 3)))) (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))))))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (* -1 (* ew (+ (* -1 (/ (* eh (pow (sin t) 2)) (* (pow ew 2) (cos t)))) (* -1 (/ (* (cos t) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* -1 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* -1/2 (* ew (* t (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) #s(hole binary64 (+ (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))) (* t (- (* t (+ (* -1/2 (* ew (cos (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/6 (* eh (* t (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t))))))))))) (* eh (sin (atan (* -1 (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* -1 (* ew (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow t 2) (- (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (- (* (pow t 2) (- (* t (- (* -1 (* ew (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* 1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* ew (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* 1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (+ (* -1 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow t 2) (+ (* ew (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (* t (+ (* 1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* ew (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (* -1 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (* -1 (/ (pow eh 2) (pow ew 2))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) ew))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (* (pow t 2) (- (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* t (+ (* 1/2 (/ (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))) ew)) (* t (- (/ (* eh (- (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))) (* -1/2 (/ (pow eh 3) (pow ew 3))))) ew) (* 1/24 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) (* -1/2 (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (* -1 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow t 2) (- (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow t 2) (- (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (* (pow t 2) (- (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (+ (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (+ (* 1/24 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3)))))))) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* 1/2 (/ (* eh (* (pow t 2) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (+ (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3))))))) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (/ (* eh (- (* -1 (/ eh ew)) (/ eh ew))) ew)) (* t (- (+ (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* t (- (+ (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (* t (- (* 1/2 (/ (* eh (- (+ (* -2/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (+ (* -1/6 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (/ (* eh (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) ew)))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) ew)) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3))))))) (+ (* -1/4 (/ (* eh (* (+ (* -1/3 (/ eh ew)) (+ (* 1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)) (* 1/2 (/ (* (pow eh 2) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))) (pow ew 2)))))))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew))))) (* 1/4 (/ (* (pow eh 3) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 3))))))) (* -1/4 (/ (* eh (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))) ew)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* 1/2 (* (pow t 2) (- (* -1 (/ eh ew)) (/ eh ew)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (- (* -1 (/ eh ew)) (/ eh ew))) (* t (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (- (* -1 (/ eh ew)) (/ eh ew))) (* t (- (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* t (- (* 1/2 (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew))))))) (* 1/4 (/ (* (pow eh 2) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 2))))))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (* (pow t 2) (+ (* 1/2 (- (* -1 (/ eh ew)) (/ eh ew))) (* t (- (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* t (- (+ (* 1/2 (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (* t (- (* 1/2 (- (+ (* -2/3 (/ (pow eh 2) (pow ew 2))) (+ (* -1/2 (/ (* (pow eh 2) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) (pow ew 2))) (+ (* -1/6 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (/ (* eh (+ (* -1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) ew)))) (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/4 (/ (pow eh 4) (pow ew 4)))))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (- (+ (* -1/3 (/ eh ew)) (+ (* -1/6 (- (* -1 (/ eh ew)) (/ eh ew))) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (* 1/3 (/ eh ew)))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew))))))) (* 1/4 (/ (* (pow eh 2) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 2))))))) (+ (* -1/4 (* (+ (* -1/3 (/ eh ew)) (+ (* 1/3 (/ eh ew)) (+ (* 1/2 (/ (pow eh 3) (pow ew 3))) (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew)))) (- (* -1 (/ eh ew)) (/ eh ew)))) (* 1/2 (/ (* (pow eh 2) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))) (pow ew 2)))))))) (+ (* -1/2 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew))))))) (* 1/4 (/ (* (pow eh 2) (- (* -1 (/ eh ew)) (/ eh ew))) (pow ew 2))))))) (* -1/4 (* (+ (* -1 (/ eh ew)) (/ eh ew)) (- (* -1 (/ eh ew)) (/ eh ew)))))))))) |
#s(approx (* -1 (sin t)) #s(hole binary64 (* -1 t))) |
#s(approx (* -1 (sin t)) #s(hole binary64 (* t (- (* 1/6 (pow t 2)) 1)))) |
#s(approx (* -1 (sin t)) #s(hole binary64 (* t (- (* (pow t 2) (+ 1/6 (* -1/120 (pow t 2)))) 1)))) |
#s(approx (* -1 (sin t)) #s(hole binary64 (* t (- (* (pow t 2) (+ 1/6 (* (pow t 2) (- (* 1/5040 (pow t 2)) 1/120)))) 1)))) |
#s(approx (sin t) #s(hole binary64 t)) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* -1/6 (pow t 2)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* 1/120 (pow t 2)) 1/6)))))) |
#s(approx (sin t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/120 (* -1/5040 (pow t 2)))) 1/6)))))) |
#s(approx t #s(hole binary64 t)) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* -1/2 (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/24 (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/720 (* (pow t 2) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (cos t) #s(hole binary64 1)) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* -1/2 (pow t 2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* 1/24 (pow t 2)) 1/2))))) |
#s(approx (cos t) #s(hole binary64 (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 1/24 (* -1/720 (pow t 2)))) 1/2))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (/ (* eh t) ew))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* 1/3 (/ (* eh (pow t 2)) ew)) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 2/15 (/ (* eh (pow t 2)) ew)) (* 1/3 (/ eh ew)))) (/ eh ew))))) |
#s(approx (* (/ eh ew) (tan t)) #s(hole binary64 (* t (+ (* (pow t 2) (+ (* 1/3 (/ eh ew)) (* (pow t 2) (+ (* 17/315 (/ (* eh (pow t 2)) ew)) (* 2/15 (/ eh ew)))))) (/ eh ew))))) |
#s(approx (tan t) #s(hole binary64 t)) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* 1/3 (pow t 2)))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* 2/15 (pow t 2)))))))) |
#s(approx (tan t) #s(hole binary64 (* t (+ 1 (* (pow t 2) (+ 1/3 (* (pow t 2) (+ 2/15 (* 17/315 (pow t 2)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* eh (* (pow t 2) (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew))))) (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/2 (* eh (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2))))))) (* eh (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (+ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* eh (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew)))) (* t (+ (* -1/2 (* eh (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* eh (* t (- (+ (* -1/2 (/ (pow eh 3) (pow ew 3))) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (+ (* -1/2 (* t (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))) (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (+ (* (pow t 2) (- (+ (* -1/2 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* t (- (* t (- (+ (* -1/2 (/ (pow eh 3) (pow ew 3))) (* 1/24 (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh))) (+ (* 1/6 (/ eh ew)) (* 1/2 (+ (* -1 (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) ew)) (+ (* -1/3 (/ (pow eh 3) (pow ew 3))) (+ (* 1/3 (+ (* -2 (/ eh ew)) (+ (* -2 (/ (pow eh 3) (pow ew 3))) (* 3 (/ (pow eh 3) (pow ew 3)))))) (+ (/ (* eh (+ (* -1 (/ (pow eh 2) (pow ew 2))) (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2)))))) ew) (/ (* eh (+ (* 1/2 (+ (* -1 (/ (pow eh 2) (pow ew 2))) (/ (pow eh 2) (pow ew 2)))) (* 1/2 (/ (pow eh 2) (pow ew 2))))) ew))))))))) (* 1/2 (+ (* -2 (/ (pow eh 2) (pow ew 2))) (* 2 (/ (pow eh 2) (pow ew 2)))))))) (* -1 (/ eh ew)))) (/ (* ew (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (+ (* ew (* (pow t 2) (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2))))) (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (+ (* (pow t 2) (+ (* ew (* (pow t 2) (- (+ (* -1/3 (/ eh (pow ew 2))) (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 (/ eh (pow ew 2)))))) (* ew (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2)))))) (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) #s(hole binary64 (+ (* (pow t 2) (+ (* ew (+ (* -1/2 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh (pow ew 2)))) (* (pow t 2) (+ (* ew (* (pow t 2) (- (+ (* -1/720 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 2/45 (/ eh (pow ew 2)))) (+ (* -1/2 (- (* -1/3 (/ eh (pow ew 2))) (* -1/2 (/ eh (pow ew 2))))) (* 1/24 (/ eh (pow ew 2))))))) (* ew (- (+ (* -1/3 (/ eh (pow ew 2))) (* 1/24 (/ (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 (/ eh (pow ew 2))))))))) (/ (* ew (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (/ eh ew))) (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (+ (* (pow t 2) (- (+ (* -1/3 (/ eh ew)) (* 1/24 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 (/ eh ew)))) (/ eh ew)))) (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (+ (* (pow t 2) (- (+ (* -1/3 (/ eh ew)) (+ (* 1/24 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (- (+ (* -1/720 (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 2/45 (/ eh ew))) (+ (* -1/2 (/ (- (* -1/3 eh) (* -1/2 eh)) ew)) (* 1/24 (/ eh ew))))))) (* -1/2 (/ eh ew)))) (/ eh ew)))) (/ (* ew (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (* (pow t 2) (+ eh (* -1/2 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (* (pow t 2) (+ eh (+ (* -1/2 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (- (+ (* -1/3 eh) (* 1/24 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) (* -1/2 eh)))))) (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) #s(hole binary64 (+ (* (pow t 2) (+ eh (+ (* -1/2 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (- (+ (* -1/3 eh) (+ (* 1/24 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (- (+ (* -1/720 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 2/45 eh)) (+ (* -1/2 (- (* -1/3 eh) (* -1/2 eh))) (* 1/24 eh)))))) (* -1/2 eh)))))) (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) #s(hole binary64 (* eh (pow t 2)))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) #s(hole binary64 (* (pow t 2) (+ eh (* (pow t 2) (- (* -1/3 eh) (* -1/2 eh))))))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) #s(hole binary64 (* (pow t 2) (+ eh (* (pow t 2) (- (+ (* -1/3 eh) (* (pow t 2) (- (* 2/45 eh) (+ (* -1/2 (- (* -1/3 eh) (* -1/2 eh))) (* 1/24 eh))))) (* -1/2 eh))))))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) #s(hole binary64 (* (pow t 2) (+ eh (* (pow t 2) (- (+ (* -1/3 eh) (* (pow t 2) (- (+ (* 2/45 eh) (* (pow t 2) (- (* -1/315 eh) (+ (* -1/2 (- (* 2/45 eh) (+ (* -1/2 (- (* -1/3 eh) (* -1/2 eh))) (* 1/24 eh)))) (+ (* -1/720 eh) (* 1/24 (- (* -1/3 eh) (* -1/2 eh)))))))) (+ (* -1/2 (- (* -1/3 eh) (* -1/2 eh))) (* 1/24 eh))))) (* -1/2 eh))))))) |
#s(approx (* eh (pow (sin t) 2)) #s(hole binary64 (* eh (pow t 2)))) |
#s(approx (* eh (pow (sin t) 2)) #s(hole binary64 (* (pow t 2) (+ eh (* -1/3 (* eh (pow t 2))))))) |
#s(approx (* eh (pow (sin t) 2)) #s(hole binary64 (* (pow t 2) (+ eh (* (pow t 2) (+ (* -1/3 eh) (* 2/45 (* eh (pow t 2))))))))) |
#s(approx (* eh (pow (sin t) 2)) #s(hole binary64 (* (pow t 2) (+ eh (* (pow t 2) (+ (* -1/3 eh) (* (pow t 2) (+ (* -1/315 (* eh (pow t 2))) (* 2/45 eh))))))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (pow t 2))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (* (pow t 2) (+ 1 (* -1/3 (pow t 2)))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (* (pow t 2) (+ 1 (* (pow t 2) (- (* 2/45 (pow t 2)) 1/3)))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (* (pow t 2) (+ 1 (* (pow t 2) (- (* (pow t 2) (+ 2/45 (* -1/315 (pow t 2)))) 1/3)))))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* -1/2 (/ (* (pow ew 2) (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* 1/24 (/ (* (pow ew 2) (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)))) (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) #s(hole binary64 (+ (* (pow t 2) (+ (* -1/2 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)) (* (pow t 2) (+ (* -1/720 (/ (* (pow ew 2) (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) eh)) (* 1/24 (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))))) (/ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) eh)))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (* -1/2 (* (pow ew 2) (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/24 (* (pow ew 2) (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) #s(hole binary64 (+ (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/2 (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* (pow t 2) (+ (* -1/720 (* (pow ew 2) (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))) (* 1/24 (* (pow ew 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (+ (cos (atan (/ (* eh (sin t)) (* ew (cos t))))) (* -1/2 (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (+ (cos (atan (/ (* eh (sin t)) (* ew (cos t))))) (* (pow t 2) (+ (* -1/2 (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* 1/24 (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) #s(hole binary64 (+ (cos (atan (/ (* eh (sin t)) (* ew (cos t))))) (* (pow t 2) (+ (* -1/2 (cos (atan (/ (* eh (sin t)) (* ew (cos t)))))) (* (pow t 2) (+ (* -1/720 (* (pow t 2) (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))) (* 1/24 (cos (atan (/ (* eh (sin t)) (* ew (cos t))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) #s(hole binary64 (* -1 (* ew (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) #s(hole binary64 (* ew (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) #s(hole binary64 (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) #s(hole binary64 (- (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))) (* (cos t) (cos (neg (atan (/ (* eh (sin t)) (* ew (cos t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) #s(hole binary64 (/ (* eh (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t))))))) (* ew (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) #s(hole binary64 (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))) |
#s(approx (* -1 (sin t)) #s(hole binary64 (* -1 (sin t)))) |
#s(approx (sin t) #s(hole binary64 (sin t))) |
#s(approx (cos t) #s(hole binary64 (cos t))) |
#s(approx (tan t) #s(hole binary64 (/ (sin t) (cos t)))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) #s(hole binary64 (* eh (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(hole binary64 (- (/ (* ew (* (cos t) (cos (atan (neg (/ (* eh (sin t)) (* ew (cos t)))))))) eh) (/ (* (sin t) (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (+ (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t))))) (/ (* eh (sin t)) (* ew (cos t)))))) (- (+ (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ 1 (- (sqrt (+ 1 (/ (* (pow eh 2) (pow (sin t) 2)) (* (pow ew 2) (pow (cos t) 2))))) (/ (* eh (sin t)) (* ew (cos t)))))) (/ (* eh (sin t)) (* ew (cos t)))))))) |
#s(approx (pow (sin t) 2) #s(hole binary64 (pow (sin t) 2))) |
| Outputs |
|---|
(sqrt.f64 (*.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew))) #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew))))) |
(fabs.f64 (neg.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew))))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew))) |
(neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew)) |
(*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
(-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) |
(/.f64 (neg.f64 eh) (neg.f64 ew)) |
(/.f64 eh ew) |
eh |
ew |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t))) |
(*.f64 #s(literal -1 binary64) (sin.f64 t)) |
#s(literal -1 binary64) |
(sin.f64 t) |
t |
(*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(/.f64 (+.f64 (cos.f64 (+.f64 t (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (cos.f64 (-.f64 t (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 t (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 (-.f64 t (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) #s(literal 2 binary64)) |
(sin.f64 (+.f64 t (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 t)) |
(cos.f64 t) |
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
(sin.f64 (+.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (+.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
(atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) |
(*.f64 (/.f64 eh ew) (tan.f64 t)) |
(/.f64 (neg.f64 (*.f64 eh (sin.f64 t))) (neg.f64 (*.f64 ew (cos.f64 t)))) |
(/.f64 (*.f64 eh (sin.f64 t)) (*.f64 ew (cos.f64 t))) |
(/.f64 (neg.f64 (sin.f64 t)) (neg.f64 (cos.f64 t))) |
(/.f64 (sin.f64 t) (cos.f64 t)) |
(tan.f64 (+.f64 t (PI.f64))) |
(tan.f64 t) |
(sqrt.f64 (*.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh)) #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh)))) |
(fabs.f64 (neg.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh)) |
(*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew)) |
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) (neg.f64 ew)) |
(/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew) |
(+.f64 (/.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) ew) (/.f64 (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) ew)) |
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (*.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))))) |
(/.f64 (fma.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) eh (*.f64 (cos.f64 t) (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (*.f64 (cos.f64 t) eh)) |
(+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
(/.f64 (neg.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (neg.f64 (cos.f64 t))) |
(/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) |
(*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) |
(*.f64 (sin.f64 t) (sin.f64 t)) |
(pow.f64 (sin.f64 t) #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 (sin.f64 t)) #s(literal 2 binary64))) |
#s(literal 2 binary64) |
(/.f64 (neg.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (neg.f64 eh)) |
(/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) |
(*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(*.f64 (neg.f64 ew) (neg.f64 ew)) |
(*.f64 (fabs.f64 ew) (fabs.f64 ew)) |
(*.f64 ew ew) |
(pow.f64 ew #s(literal 2 binary64)) |
(exp.f64 (*.f64 (log.f64 ew) #s(literal 2 binary64))) |
(*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(/.f64 (+.f64 (cos.f64 (+.f64 t (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (cos.f64 (-.f64 t (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 t (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 (-.f64 t (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) #s(literal 2 binary64)) |
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
(sin.f64 (+.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(sin.f64 (+.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) |
(cos.f64 (neg.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
(cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
(cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (fabs (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew)))))) (fabs.f64 (-.f64 (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) ew)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) ew) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))) ew))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) ew) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) ew) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t))))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) ew) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) ew) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t))))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) ew) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t))))) ew) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))) (cos.f64 t)))))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t))))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) ew))))))) |
#s(approx (/ eh ew) (/.f64 eh ew)) |
#s(approx eh eh) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 eh (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t))))) (*.f64 eh (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))) (cos.f64 t))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (cos (atan (* (/ eh ew) (tan t)))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (neg (atan (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (atan (* (/ eh ew) (tan t))) (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) |
#s(approx (* (/ eh ew) (tan t)) (*.f64 (/.f64 eh ew) (tan.f64 t))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 eh eh) (fma.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))) eh)) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) eh)) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 eh eh) (-.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (cos.f64 t))) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64))))) (/.f64 (fma.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t))))))) eh)) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))) eh)) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (/.f64 (fma.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))) eh)) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (/.f64 (fma.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (cos.f64 t))) eh)) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t))) |
#s(approx (* eh (pow (sin t) 2)) (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (cos (atan (* (/ eh ew) (tan t)))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 eh (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 eh (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 eh (-.f64 (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))) ew))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 eh (-.f64 (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64)))) ew) (*.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) ew)))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) ew))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))))) (pow.f64 eh #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 ew #s(literal 3 binary64)) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))))) (pow.f64 eh #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 ew #s(literal 3 binary64)) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 eh (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (cos.f64 t))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 eh #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))))) (pow.f64 eh #s(literal 4 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))) (*.f64 eh eh)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 ew #s(literal 4 binary64)) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (pow.f64 ew #s(literal 3 binary64)) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (pow.f64 ew #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (sin.f64 t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (cos.f64 t))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (pow.f64 eh #s(literal 6 binary64)))))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 t) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 eh eh)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 eh eh))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 eh eh)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 eh #s(literal 4 binary64)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 eh eh)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t)))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (cos.f64 t))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 eh #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 eh eh)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 eh #s(literal 4 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (*.f64 eh eh)) (fma.f64 #s(literal -1/8 binary64) (*.f64 (/.f64 (pow.f64 ew #s(literal 4 binary64)) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (pow.f64 eh #s(literal 6 binary64))) (/.f64 (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))))))) (sin.f64 t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))))) (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 6 binary64)) (pow.f64 (sin.f64 t) #s(literal 6 binary64))))) (cos.f64 t))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 eh #s(literal 6 binary64))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh)) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 4 binary64)))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (+.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 ew ew) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))) (exp.f64 (neg.f64 (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)))) (neg.f64 (log.f64 eh)))))) #s(literal 2 binary64))))) (*.f64 eh eh))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (*.f64 (/.f64 eh ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (*.f64 eh (+.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 eh eh)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (*.f64 (/.f64 eh ew) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (*.f64 eh (+.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 eh eh)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (*.f64 eh (+.f64 (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 eh eh)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh)) (*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh)) eh)))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh)))) eh))) eh)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 t) eh) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) ew)) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) ew))) eh)) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (/.f64 (*.f64 eh (sin.f64 t)) ew)) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 t) eh) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (/.f64 (sin.f64 t) eh) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) eh)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 eh eh)))) eh)) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (*.f64 eh (sin.f64 t)) ew)) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 eh eh))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (pow.f64 eh #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 eh eh)))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) ew) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (fma.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (-.f64 (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (pow.f64 eh #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 (/.f64 (sin.f64 t) ew) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (fma.f64 (/.f64 (sin.f64 t) ew) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (pow.f64 eh #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (*.f64 ew (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 eh eh))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (sin.f64 t)) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (-.f64 (+.f64 (sin.f64 t) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (*.f64 eh eh) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (-.f64 (+.f64 (sin.f64 t) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (fma.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (fma.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (-.f64 (+.f64 (sin.f64 t) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (*.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (fma.f64 (/.f64 (sin.f64 t) (*.f64 eh eh)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 (/.f64 (sin.f64 t) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 5 binary64)) (pow.f64 (sin.f64 t) #s(literal 5 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 3 binary64)))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (pow.f64 eh #s(literal 6 binary64))) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (fma.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (fma.f64 (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))) (pow.f64 eh #s(literal 4 binary64))) (/.f64 (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (cos.f64 t) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (-.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64)))) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 ew (cos.f64 t)) (sin.f64 t)) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal -1 binary64))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))) (*.f64 (pow.f64 eh #s(literal 6 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh))) eh) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) eh)) eh)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (pow.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (fma.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))) (*.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64)) (*.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (pow.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) #s(literal 2 binary64))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))))))) (*.f64 eh eh))) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (*.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (sin.f64 t)) (/.f64 (*.f64 (cos.f64 t) (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 ew (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))) (/.f64 (cos.f64 t) (*.f64 (sin.f64 t) (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))))))))))) (pow.f64 (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))))) #s(literal 2 binary64)))))) eh))) eh)) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))) (+.f64 (exp.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64))))) (exp.f64 (neg.f64 (+.f64 (log.f64 (-.f64 (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (sin.f64 t) (*.f64 ew (cos.f64 t)))))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) eh) #s(literal -1 binary64)))))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 eh eh)) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 eh eh)) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (*.f64 ew (cos.f64 t)))))))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 eh eh)) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (-.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 ew (-.f64 (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))))) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))))) (*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 ew (fma.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) ew)) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (/.f64 (fma.f64 ew (-.f64 (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) ew)) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (/.f64 (fma.f64 ew (-.f64 (*.f64 ew (fma.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) ew)) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 ew (-.f64 (*.f64 ew (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 ew (-.f64 (*.f64 ew (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (sin.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) ew)) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (sin.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) ew)) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -1 binary64) (*.f64 eh (sin.f64 t)) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (sin.f64 t)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (sin.f64 t))))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) (sin.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) ew)) |
#s(approx ew ew) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (fma.f64 #s(literal -1 binary64) (sin.f64 t) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (fma.f64 #s(literal -1 binary64) (sin.f64 t) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) eh)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))) (sin.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (fma.f64 #s(literal -1 binary64) (sin.f64 t) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh) (*.f64 (*.f64 ew ew) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) eh) (*.f64 (*.f64 ew ew) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 5 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 5 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64))))))) eh)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) eh)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))) (sin.f64 t))))))) (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/64 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))) (*.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 6 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 6 binary64))))))) (cos.f64 t)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 3 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))))) eh))))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 (sin.f64 t) #s(literal 3 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (cos.f64 t) eh) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))) (sin.f64 t)))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (cos.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))) eh)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (*.f64 ew (fma.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (*.f64 ew (fma.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 (*.f64 ew ew) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 4 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (fma.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (/.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (+.f64 (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 1/24 binary64) (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (fma.f64 #s(literal 1/32 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (*.f64 (pow.f64 eh #s(literal 4 binary64)) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 4 binary64))))) (*.f64 #s(literal 1/24 binary64) (/.f64 (fma.f64 #s(literal -3/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 4 binary64)) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64))))) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64))))))) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (*.f64 (sin.f64 t) (-.f64 (fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 eh eh)) (/.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) (/.f64 (*.f64 (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))) (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (cos.f64 t) #s(literal 2 binary64)) (*.f64 (*.f64 eh eh) (*.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (pow.f64 (sin.f64 t) #s(literal 2 binary64)))))))) (pow.f64 (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t)))))))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew)) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew)) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) |
#s(approx (* ew ew) (*.f64 ew ew)) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (*.f64 ew ew))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (*.f64 ew ew)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))))) (pow.f64 ew #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (*.f64 ew ew))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 eh #s(literal 3 binary64)) (pow.f64 ew #s(literal 4 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (*.f64 ew ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) ew))) (*.f64 ew ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))))) (*.f64 ew ew))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) ew) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) (*.f64 ew ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))))) (cos.f64 t)))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))))) (*.f64 ew ew)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) ew) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 eh eh) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))))) (*.f64 ew ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) ew))) ew)) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))) (*.f64 ew ew))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) ew) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))))) ew)) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (/.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))) ew) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))))) (cos.f64 t))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)))) (*.f64 ew ew)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) ew) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 eh eh) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))))) ew)) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (pow.f64 ew #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t)) (fma.f64 #s(literal -1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) (pow.f64 ew #s(literal 4 binary64))) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64)))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (*.f64 (*.f64 ew ew) (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) ew))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64)))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))) (pow.f64 ew #s(literal 3 binary64)))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))))) (pow.f64 ew #s(literal 3 binary64))) (fma.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew)) (pow.f64 ew #s(literal 3 binary64))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 ew ew))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) ew) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 eh #s(literal 3 binary64)) ew) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 ew ew)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 ew ew)))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) ew))) (*.f64 ew ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) ew) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (pow.f64 eh #s(literal 3 binary64)) ew) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 ew ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64)))))))) ew))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 eh eh) ew) (/.f64 (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 eh (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) ew))) ew) (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) (*.f64 ew ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) ew))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 4 binary64)) (pow.f64 (cos.f64 t) #s(literal 4 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (*.f64 (pow.f64 (sin.f64 t) #s(literal 3 binary64)) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sin.f64 t) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)))))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (-.f64 (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (sin.f64 t)) (cos.f64 t))))))) ew))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (pow.f64 ew #s(literal 3 binary64))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (*.f64 (*.f64 ew ew) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))))) ew)) (pow.f64 ew #s(literal 3 binary64))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (pow.f64 ew #s(literal 3 binary64))))) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 (sin.f64 t) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (cos.f64 t)) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))))))) (cos.f64 t)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))))) (fma.f64 #s(literal 1/3 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))) (cos.f64 t))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 3 binary64)) (pow.f64 (cos.f64 t) #s(literal 3 binary64)))))) ew) (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 t) (fma.f64 #s(literal -2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (cos.f64 t) #s(literal 2 binary64)))))))) (pow.f64 ew #s(literal 3 binary64))))) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))))))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (fma.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t))) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 #s(literal -1 binary64) (*.f64 eh (*.f64 t (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 t (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 ew (*.f64 t (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 t (-.f64 (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal 1/6 binary64) (*.f64 eh (*.f64 t (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (*.f64 eh (sin.f64 (atan.f64 (*.f64 #s(literal -1 binary64) (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))))) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 t (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 t (-.f64 (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/24 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))))) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) (*.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 ew (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (*.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 ew (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 ew (*.f64 t (-.f64 (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/24 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (*.f64 #s(literal -1 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 t (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew) (*.f64 t (-.f64 (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))) (*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) ew) (*.f64 #s(literal 1/24 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (*.f64 #s(literal -1 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) ew)) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) ew) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) ew) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew)))) (fma.f64 #s(literal 1/24 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (pow.f64 ew #s(literal 3 binary64))))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew))))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) ew) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) ew) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (pow.f64 ew #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) ew) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) ew) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal -2/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (/.f64 (*.f64 eh (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) ew)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) ew)) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (pow.f64 ew #s(literal 3 binary64))))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew)))) (*.f64 ew ew)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (pow.f64 eh #s(literal 3 binary64)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (pow.f64 ew #s(literal 3 binary64)))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 eh (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))) ew))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (*.f64 ew ew))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))))))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 t (-.f64 (fma.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew))) (*.f64 t (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -2/3 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 ew ew)) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (/.f64 (*.f64 eh (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) ew)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 eh #s(literal 4 binary64)) (pow.f64 ew #s(literal 4 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal -1/6 binary64) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew)))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (*.f64 ew ew)))))) (fma.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) ew)))) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))))) (*.f64 ew ew)))))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 eh eh) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))) (*.f64 ew ew))))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (fma.f64 #s(literal -1 binary64) (/.f64 eh ew) (/.f64 eh ew)) (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 eh ew)) (/.f64 eh ew))))))))) |
#s(approx (* -1 (sin t)) (*.f64 #s(literal -1 binary64) t)) |
#s(approx (* -1 (sin t)) (*.f64 t (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 t t)) #s(literal 1 binary64)))) |
#s(approx (* -1 (sin t)) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/6 binary64) (*.f64 #s(literal -1/120 binary64) (*.f64 t t)))) #s(literal 1 binary64)))) |
#s(approx (* -1 (sin t)) (*.f64 t (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/5040 binary64) (*.f64 t t)) #s(literal 1/120 binary64))))) #s(literal 1 binary64)))) |
#s(approx (sin t) t) |
#s(approx (sin t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 t t))))) |
#s(approx (sin t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 t t)) #s(literal 1/6 binary64)))))) |
#s(approx (sin t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 t t)))) #s(literal 1/6 binary64)))))) |
#s(approx t t) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (+.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (+.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (+.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) |
#s(approx (cos t) #s(literal 1 binary64)) |
#s(approx (cos t) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 t t)))) |
#s(approx (cos t) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 t t)) #s(literal 1/2 binary64))))) |
#s(approx (cos t) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 t t)))) #s(literal 1/2 binary64))))) |
#s(approx (* (/ eh ew) (tan t)) (/.f64 (*.f64 eh t) ew)) |
#s(approx (* (/ eh ew) (tan t)) (*.f64 t (fma.f64 #s(literal 1/3 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew) (/.f64 eh ew)))) |
#s(approx (* (/ eh ew) (tan t)) (*.f64 t (fma.f64 (*.f64 t t) (fma.f64 #s(literal 2/15 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew) (*.f64 #s(literal 1/3 binary64) (/.f64 eh ew))) (/.f64 eh ew)))) |
#s(approx (* (/ eh ew) (tan t)) (*.f64 t (fma.f64 (*.f64 t t) (fma.f64 #s(literal 1/3 binary64) (/.f64 eh ew) (*.f64 (*.f64 t t) (fma.f64 #s(literal 17/315 binary64) (/.f64 (*.f64 eh (*.f64 t t)) ew) (*.f64 #s(literal 2/15 binary64) (/.f64 eh ew))))) (/.f64 eh ew)))) |
#s(approx (tan t) t) |
#s(approx (tan t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/3 binary64) (*.f64 t t))))) |
#s(approx (tan t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 2/15 binary64) (*.f64 t t))))))) |
#s(approx (tan t) (*.f64 t (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 t t) (+.f64 #s(literal 2/15 binary64) (*.f64 #s(literal 17/315 binary64) (*.f64 t t))))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 eh (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew)))) (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) (*.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew)))))))) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (fma.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 eh (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew))) (*.f64 t (fma.f64 #s(literal -1/2 binary64) (*.f64 eh (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (*.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew))))))))))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (fma.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) (*.f64 #s(literal -1 binary64) (/.f64 eh ew))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (fma.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (*.f64 t (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (*.f64 #s(literal -1 binary64) (/.f64 eh ew))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (fma.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 t (-.f64 (*.f64 t (-.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (fma.f64 #s(literal 1/6 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))) ew) (fma.f64 #s(literal -1/3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (fma.f64 #s(literal 1/3 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 eh ew) (fma.f64 #s(literal -2 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64)) (*.f64 #s(literal 3 binary64) (pow.f64 (/.f64 eh ew) #s(literal 3 binary64))))) (/.f64 (fma.f64 eh (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew))))) (*.f64 eh (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (/.f64 (*.f64 eh eh) (*.f64 ew ew))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))) ew)))))))) (*.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 eh eh) (*.f64 ew ew)))))))) (*.f64 #s(literal -1 binary64) (/.f64 eh ew))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (fma.f64 ew (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (/.f64 eh (*.f64 ew ew)))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (fma.f64 (*.f64 t t) (fma.f64 ew (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh (*.f64 ew ew)) (*.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh))) (*.f64 #s(literal -1/2 binary64) (/.f64 eh (*.f64 ew ew))))) (*.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (/.f64 eh (*.f64 ew ew))))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (fma.f64 (*.f64 t t) (fma.f64 ew (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (/.f64 eh (*.f64 ew ew))) (*.f64 (*.f64 t t) (fma.f64 ew (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh) (*.f64 #s(literal 2/45 binary64) (/.f64 eh (*.f64 ew ew)))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) (/.f64 eh (*.f64 ew ew))) (*.f64 #s(literal -1/2 binary64) (/.f64 eh (*.f64 ew ew)))) (*.f64 #s(literal 1/24 binary64) (/.f64 eh (*.f64 ew ew)))))) (*.f64 ew (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh (*.f64 ew ew)) (*.f64 #s(literal 1/24 binary64) (/.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) eh))) (*.f64 #s(literal -1/2 binary64) (/.f64 eh (*.f64 ew ew)))))))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (/.f64 eh ew)) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (fma.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (*.f64 #s(literal -1/2 binary64) (/.f64 eh ew))) (/.f64 eh ew))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (/ (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) ew) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (fma.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/3 binary64) (/.f64 eh ew) (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 #s(literal 2/45 binary64) (/.f64 eh ew))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/3 binary64) eh) (*.f64 #s(literal -1/2 binary64) eh)) ew) (*.f64 #s(literal 1/24 binary64) (/.f64 eh ew))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 eh ew))) (/.f64 eh ew))) (/.f64 (*.f64 ew (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (fma.f64 (*.f64 t t) (+.f64 eh (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (fma.f64 (*.f64 t t) (+.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/3 binary64) eh (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) (*.f64 #s(literal -1/2 binary64) eh))))) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (+ (/ (* eh (pow (sin t) 2)) (cos t)) (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh)) (fma.f64 (*.f64 t t) (+.f64 eh (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/3 binary64) eh (fma.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 #s(literal 2/45 binary64) eh)) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) eh) (*.f64 #s(literal -1/2 binary64) eh)) (*.f64 #s(literal 1/24 binary64) eh)))))) (*.f64 #s(literal -1/2 binary64) eh))))) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) (*.f64 eh (*.f64 t t))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) (*.f64 (*.f64 t t) (+.f64 eh (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/3 binary64) eh) (*.f64 #s(literal -1/2 binary64) eh)))))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) (*.f64 (*.f64 t t) (+.f64 eh (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/3 binary64) eh (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 2/45 binary64) eh) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) eh) (*.f64 #s(literal -1/2 binary64) eh)) (*.f64 #s(literal 1/24 binary64) eh))))) (*.f64 #s(literal -1/2 binary64) eh)))))) |
#s(approx (/ (* eh (pow (sin t) 2)) (cos t)) (*.f64 (*.f64 t t) (+.f64 eh (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal -1/3 binary64) eh (*.f64 (*.f64 t t) (-.f64 (fma.f64 #s(literal 2/45 binary64) eh (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal -1/315 binary64) eh) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal 2/45 binary64) eh) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) eh) (*.f64 #s(literal -1/2 binary64) eh)) (*.f64 #s(literal 1/24 binary64) eh))) (fma.f64 #s(literal -1/720 binary64) eh (*.f64 #s(literal 1/24 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) eh) (*.f64 #s(literal -1/2 binary64) eh)))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 #s(literal -1/3 binary64) eh) (*.f64 #s(literal -1/2 binary64) eh)) (*.f64 #s(literal 1/24 binary64) eh))))) (*.f64 #s(literal -1/2 binary64) eh)))))) |
#s(approx (* eh (pow (sin t) 2)) (*.f64 eh (*.f64 t t))) |
#s(approx (* eh (pow (sin t) 2)) (*.f64 (*.f64 t t) (+.f64 eh (*.f64 #s(literal -1/3 binary64) (*.f64 eh (*.f64 t t)))))) |
#s(approx (* eh (pow (sin t) 2)) (*.f64 (*.f64 t t) (+.f64 eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/3 binary64) eh (*.f64 #s(literal 2/45 binary64) (*.f64 eh (*.f64 t t)))))))) |
#s(approx (* eh (pow (sin t) 2)) (*.f64 (*.f64 t t) (+.f64 eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/3 binary64) eh (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/315 binary64) (*.f64 eh (*.f64 t t)) (*.f64 #s(literal 2/45 binary64) eh)))))))) |
#s(approx (pow (sin t) 2) (*.f64 t t)) |
#s(approx (pow (sin t) 2) (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/3 binary64) (*.f64 t t))))) |
#s(approx (pow (sin t) 2) (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 #s(literal 2/45 binary64) (*.f64 t t)) #s(literal 1/3 binary64)))))) |
#s(approx (pow (sin t) 2) (*.f64 (*.f64 t t) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 t t) (-.f64 (*.f64 (*.f64 t t) (+.f64 #s(literal 2/45 binary64) (*.f64 #s(literal -1/315 binary64) (*.f64 t t)))) #s(literal 1/3 binary64)))))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh)) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh))) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (/ (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) eh) (fma.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/720 binary64) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))))) (/.f64 (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) eh))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 ew ew) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) (fma.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 ew ew) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) |
#s(approx (* (* ew ew) (* (cos t) (cos (atan (* (/ eh ew) (tan t)))))) (fma.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 ew ew) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 ew ew) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (+.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (+.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))))) |
#s(approx (* (cos t) (cos (atan (* (/ eh ew) (tan t))))) (+.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))) (*.f64 (*.f64 t t) (fma.f64 #s(literal -1/720 binary64) (*.f64 (*.f64 t t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 #s(literal 1/24 binary64) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))))) |
#s(approx (neg (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew)) (*.f64 #s(literal -1 binary64) (*.f64 ew (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))))) |
#s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (*.f64 ew (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) |
#s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t))))))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (* (/ eh ew) (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t))))) (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) |
#s(approx (* -1 (sin t)) (*.f64 #s(literal -1 binary64) (sin.f64 t))) |
#s(approx (sin t) (sin.f64 t)) |
#s(approx (cos t) (cos.f64 t)) |
#s(approx (tan t) (tan.f64 t)) |
#s(approx (* (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) eh) (*.f64 eh (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))))) |
#s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (-.f64 (/.f64 (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t)))))) |
#s(approx (pow (sin t) 2) (pow.f64 (sin.f64 t) #s(literal 2 binary64))) |
Compiled 121 390 to 4 831 computations (96% saved)
7 alts after pruning (0 fresh and 7 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 473 | 0 | 473 |
| Fresh | 0 | 0 | 0 |
| Picked | 0 | 2 | 2 |
| Done | 0 | 5 | 5 |
| Total | 473 | 7 | 480 |
| Status | Accuracy | Program |
|---|---|---|
| ✓ | 49.2% | (*.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
| ✓ | 99.7% | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| ✓ | 46.7% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) eh))) |
| ✓ | 27.7% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh))) |
| ✓ | 90.3% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
| ✓ | 84.0% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
| ✓ | 32.9% | (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
Compiled 1 702 to 523 computations (69.3% saved)
| Inputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) eh))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh))) |
(fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
(fabs.f64 (-.f64 (*.f64 (*.f64 ew (fma.f64 (sin.f64 t) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 (cos.f64 t) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
(*.f64 (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew))))))) (sqrt.f64 (fma.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))) (*.f64 (neg.f64 (*.f64 (sin.f64 t) eh)) (tanh.f64 (asinh.f64 (*.f64 (neg.f64 eh) (/.f64 (tan.f64 t) ew)))))))) |
| Outputs |
|---|
(fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
5 calls:
| 4.0ms | eh |
| 3.0ms | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| 3.0ms | (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
| 3.0ms | t |
| 3.0ms | ew |
| Accuracy | Segments | Branch |
|---|---|---|
| 99.8% | 1 | (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
| 99.8% | 1 | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| 99.8% | 1 | eh |
| 99.8% | 1 | ew |
| 99.8% | 1 | t |
Compiled 62 to 44 computations (29% saved)
| Inputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) eh))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh))) |
| Outputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
5 calls:
| 3.0ms | (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
| 3.0ms | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| 3.0ms | ew |
| 3.0ms | t |
| 2.0ms | eh |
| Accuracy | Segments | Branch |
|---|---|---|
| 92.8% | 2 | (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
| 92.1% | 2 | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| 99.7% | 3 | eh |
| 99.7% | 3 | ew |
| 95.0% | 2 | t |
Compiled 62 to 44 computations (29% saved)
| Inputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) #s(approx (* ew (+ (* (/ eh (* ew ew)) (/ (pow (sin t) 2) (cos t))) (/ (* (cos t) (cos (neg (atan (* (/ eh ew) (tan t)))))) eh))) (/.f64 (+.f64 (/.f64 (*.f64 eh (pow.f64 (sin.f64 t) #s(literal 2 binary64))) (cos.f64 t)) (/.f64 (*.f64 (*.f64 ew ew) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)) ew))) eh))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (- (/ (* (* (cos t) ew) (cos (atan (neg (* (/ eh ew) (tan t)))))) eh) (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t))) (*.f64 ew (fma.f64 (/.f64 eh (*.f64 ew ew)) (/.f64 (pow.f64 (sin.f64 t) #s(literal 2 binary64)) (cos.f64 t)) (/.f64 (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh)))) eh))) |
| Outputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
5 calls:
| 3.0ms | ew |
| 2.0ms | (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
| 2.0ms | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| 2.0ms | eh |
| 2.0ms | t |
| Accuracy | Segments | Branch |
|---|---|---|
| 90.3% | 1 | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| 90.3% | 1 | (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
| 90.3% | 1 | t |
| 90.3% | 1 | eh |
| 90.3% | 1 | ew |
Compiled 62 to 44 computations (29% saved)
| Inputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) (/.f64 (*.f64 (sin.f64 t) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64)) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (-.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (pow.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (*.f64 eh (sin.f64 t)) #s(literal 2 binary64)) (pow.f64 (*.f64 ew (cos.f64 t)) #s(literal 2 binary64))))) (*.f64 (/.f64 eh ew) (tan.f64 t))) #s(literal -1 binary64))) (*.f64 (/.f64 eh ew) (tan.f64 t))))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
| Outputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
5 calls:
| 2.0ms | (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
| 2.0ms | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| 2.0ms | ew |
| 2.0ms | t |
| 2.0ms | eh |
| Accuracy | Segments | Branch |
|---|---|---|
| 84.0% | 1 | (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
| 84.0% | 1 | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| 84.0% | 1 | t |
| 84.0% | 1 | eh |
| 84.0% | 1 | ew |
Compiled 62 to 44 computations (29% saved)
Total -0.0b remaining (-0%)
Threshold costs -0b (-0%)
| Inputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
| Outputs |
|---|
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
5 calls:
| 1.0ms | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| 1.0ms | (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
| 1.0ms | eh |
| 1.0ms | t |
| 1.0ms | ew |
| Accuracy | Segments | Branch |
|---|---|---|
| 32.9% | 1 | (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew))))) |
| 32.9% | 1 | ew |
| 32.9% | 1 | t |
| 32.9% | 1 | (fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
| 32.9% | 1 | eh |
Compiled 62 to 44 computations (29% saved)
| 2× | binary-search |
| 1× | narrow-enough |
| 1× | predicate-same |
| Time | Left | Right |
|---|---|---|
| 36.0ms | 3.423799704372101e-107 | 9.067485616187983e-99 |
| 7.0ms | -1.117383803343143e+82 | -8.349008820441682e+61 |
| 34.0ms | 176× | 0 | valid |
Compiled 1 660 to 885 computations (46.7% saved)
ival-sin: 8.0ms (27.3% of total)ival-cos: 7.0ms (23.9% of total)ival-mult: 5.0ms (17.1% of total)ival-tan: 3.0ms (10.2% of total)ival-neg: 2.0ms (6.8% of total)ival-div: 1.0ms (3.4% of total)ival-fabs: 1.0ms (3.4% of total)ival-atan: 1.0ms (3.4% of total)ival-sub: 1.0ms (3.4% of total)adjust: 0.0ms (0% of total)ival-assert: 0.0ms (0% of total)ival-true: 0.0ms (0% of total)Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 123 | 742 |
| 1 | 284 | 739 |
| 2 | 628 | 739 |
| 3 | 1782 | 739 |
| 4 | 6607 | 739 |
| 1× | node limit |
| Inputs |
|---|
(fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
(if (<=.f64 ew #s(literal -499999999999999971900905474397285512028612064510275265772061946028228608 binary64)) (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) (if (<=.f64 ew #s(literal 7683391208296923/9850501549098619803069760025035903451269934817616361666987073351061430442874302652853566563721228910201656997576704 binary64)) (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh))) (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
| Outputs |
|---|
(fabs.f64 (-.f64 (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))) (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 (neg.f64 eh) (tan.f64 t)) ew)))))) |
(fabs.f64 (-.f64 (*.f64 (*.f64 eh (sin.f64 t)) (sin.f64 (atan.f64 (/.f64 (*.f64 eh (tan.f64 t)) (neg.f64 ew))))) (*.f64 (*.f64 ew (cos.f64 t)) (cos.f64 (atan.f64 (/.f64 (*.f64 eh (tan.f64 t)) (neg.f64 ew))))))) |
(if (<=.f64 ew #s(literal -499999999999999971900905474397285512028612064510275265772061946028228608 binary64)) (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) (if (<=.f64 ew #s(literal 7683391208296923/9850501549098619803069760025035903451269934817616361666987073351061430442874302652853566563721228910201656997576704 binary64)) (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) eh) (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t))) eh))) (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))))) |
(if (<=.f64 ew #s(literal -499999999999999971900905474397285512028612064510275265772061946028228608 binary64)) (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (neg.f64 (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (neg.f64 ew)))) (if (<=.f64 ew #s(literal 7683391208296923/9850501549098619803069760025035903451269934817616361666987073351061430442874302652853566563721228910201656997576704 binary64)) (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 t) ew) (cos.f64 (atan.f64 (*.f64 (/.f64 (neg.f64 eh) ew) (tan.f64 t))))) eh) (*.f64 (tanh.f64 (asinh.f64 (*.f64 (/.f64 (neg.f64 eh) ew) (tan.f64 t)))) (sin.f64 t))) eh))) (fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (*.f64 (/.f64 (neg.f64 eh) ew) (tan.f64 t)))) (sin.f64 t)) ew) (*.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 (neg.f64 eh) ew) (tan.f64 t)))) (neg.f64 (cos.f64 t)))) (neg.f64 ew)))))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (sin.f64 t)) ew) (neg.f64 (*.f64 (cos.f64 (atan.f64 (neg.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))) (cos.f64 t)))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 (fma.f64 eh (/.f64 (*.f64 (tanh.f64 (asinh.f64 (*.f64 (/.f64 (neg.f64 eh) ew) (tan.f64 t)))) (sin.f64 t)) ew) (*.f64 (cos.f64 (atan.f64 (*.f64 (/.f64 (neg.f64 eh) ew) (tan.f64 t)))) (neg.f64 (cos.f64 t)))) (neg.f64 ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (*.f64 #s(literal -1 binary64) (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))))) ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (*.f64 #s(approx (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) (-.f64 (*.f64 (/.f64 eh ew) #s(approx (/ (* (sin t) (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (+ (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1) (* (/ eh ew) (tan t))))) (- (+ (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (pow (- (sqrt (+ 1 (/ (pow (* eh (sin t)) 2) (pow (* ew (cos t)) 2)))) (* (/ eh ew) (tan t))) -1)) (* (/ eh ew) (tan t)))) (neg.f64 (sin.f64 t)))) (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (neg.f64 ew)))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (neg.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t))))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
(fabs.f64 #s(approx (- (* (* ew (cos t)) (cos (atan (/ (* (neg eh) (tan t)) ew)))) (* (* eh (sin t)) (sin (atan (/ (* (neg eh) (tan t)) ew))))) (neg.f64 #s(approx (* (+ (* eh (/ (* (tanh (asinh (neg (* (/ eh ew) (tan t))))) (sin t)) ew)) (neg (* (cos (atan (neg (* (/ eh ew) (tan t))))) (cos t)))) ew) (fma.f64 #s(literal -1 binary64) (*.f64 ew (*.f64 (cos.f64 t) (cos.f64 (atan.f64 (*.f64 (/.f64 eh ew) (tan.f64 t)))))) (/.f64 (*.f64 eh (*.f64 (sin.f64 t) (-.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))) (+.f64 (exp.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))) (exp.f64 (neg.f64 (log.f64 (*.f64 ew (*.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 t) (*.f64 eh (sin.f64 t))))))))))))))) |
| 1× | done |
Compiled 742 to 123 computations (83.4% saved)
Compiled 1 544 to 282 computations (81.7% saved)
Loading profile data...